Voila un exemple qui sert a ajouter les Num des stg dans un combobox ou (dropdownlist) en fesant une boucle sur la totalité des "cod" des stagiaire :
Private Sub Consultation_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim cmd As New SqlCommand ("Select code from Stagiaire",cn)
Try
datar = cmd.ExecuteReader
While (datar.Read)
Combo1.Items.Add(datar(0))
End While
datar.Close()
Catch ex As Exception
MessageBox(ex.message)
End Try
End Sub
n'oublie pas de déclarer ta connecyion en haut
et aussi l'importation des system.data.sqlclient et system.data
-imports system.data.salclient
-imports system.data