Cita:
Iniciado por univercity 
'Aqui ejecutas la consulta
sql="SELECT * FROM vinos WHERE cepa=" & variedad
Mylistbox.DataTextField= "cepa"
Mylistbox.DataValueField ="cepa"
Mylistbox.DataSource= DS.Tables("vinos")
cboforo.DataBind()
End sub
Cuando puse lo de sql me referia a que realizaras la consulta otra vez, es decir tienes que llenar un dataset con la nueva consulta ej:
sql="mi consulta"
da=new dataadapter(sql,con)
da.fill(ds,"lista")
Entiendes?
Ademas veo que la variavel que le pasas a la consulta, no la llenas por ningun lado, deberias llenarla con la selecion de tu drop
variedad=me.drop.selectectitem.value.tostring