With ComboBox1 .DataSource = "Select Id, Nom from Table1" .DisplayMember = "Nom" .ValueMember = "Id" .SelectedIndex = -1 End With
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDim Con As New SqlConnection(TaChaineDeConnexion) Dim ds As New DataSet str = "Select Id, Nom from Table1" Dim da As New SqlDataAdapter(str, Con) da.Fill(ds, "Table1") With ComboBox1 .DataSource = ds.tables("Table1") .DisplayMember = "Nom" .ValueMember = "Id" .SelectedIndex = -1 End With