ci sono riuscito! posto il codice x chi ne avesse bisogno

If cbCategoria.Text = "Vini" Then
Me.ViniTableAdapter1.Fill(Me.Database2DataSet1.Vin i)
cbFornitori.DataSource = Database2DataSet1.Vini
cbFornitori.ValueMember = "Vini"
ElseIf cbCategoria.Text = "Carne" Then
Me.CarneTableAdapter1.Fill(Me.Database2DataSet1.Ca rne)
cbFornitori.DataSource = Database2DataSet1.Carne
cbFornitori.ValueMember = "Carne"
End If

l'unico neo è che ho dovuto inserire un cmdbutton per visualizzare l'elenco dei fornitori dopo aver scelto la categoria... vorrei che la cbFornitori si popoli dalla selezione della categoria dell'utente.

Idee in merito?