bonjour
voila je veux remplir un combobox avec une dataset mais j'arrive pas d'apres la recherche il faut le relier a BindingSource avant bon voila mon code:
merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Dim detailsBindingSource As New BindingSource() Try OBconnc.ouverture() OBconnc.insertion(requete) OBconnc.objDataSet = OBconnc.createtDataSet(requete, "test") combo.Items.Clear() detailsBindingSource.DataSource = OBconnc.objDataSet combo.DataSource = detailsBindingSource combo.ValueMember = "test1" 'champ_value 'puisque la combobox a une valeur afficher combo.DisplayMember = "test2" 'et une pris comme value" combo.Update() combo.Refresh() Catch ex As Exception MsgBox(ex.Message ) End Try
Partager