remplissage combobox en mode connecté
salut tous le monde je veux remplir une combobox avec les enregistrement d'une table en utilisant le mode connecté mais rien ne s'affiche voici ma suggestion:
Code:
1 2 3 4 5 6 7 8 9 10 11 12
|
cmd.CommandText = "select*from client"
cmd.Connection = con
If con.State = ConnectionState.Closed Then
con.Open()
End If
Dim i As Integer = 0
dr = cmd.ExecuteReader
For Each o As Object In dr
ComboBox1.Items.Add(o)
Next |
s'il y a d'autre suggestion n'hésiter pas et Merci pour vos réponses. :D