Dim mavaleur As String For ligne As Integer = 0 To Me.DataGridView1.Rows.Count - 1 'tu parcours les lignes de la DataGridView1 mavaleur = CStr(Me.DataGridView1.Rows(ligne).Cells(0).Value) 'mavaleur contient maintenant la valeur de la première colonne ComboBox1.Items.Add(mavaleur) ligne = ligne + 1 Next ComboBox1.SelectedIndex = 0
Dim mavaleur As String mavaleur = "30" For ligne As Integer = 0 To ComboBox1.Items.Count - 1 'tu parcours les lignes de la combobox If ComboBox1.Items(ligne).ToString = mavaleur Then 'on peut mettre un message Exit Sub End If Next ComboBox1.Items.Add(mavaleur) End Sub
ComboBox.1.Items.Add("")au début du code mais le résultat n'est pas convaincant
Dim mavaleur As String ComboBox1.Items.Clear() For ligne As Integer = 0 To Me.DataGridView1.Rows.Count - 1 'tu parcours les lignes de la DataGridView1 mavaleur = CStr((Me.DataGridView1.Rows(ligne).Cells(0).Value)) 'Valeur contient maintenant la valeur de la première colonne ComboBox1.Items.Add(mavaleur & "") Next ComboBox1.SelectedIndex = 0