Public Class Form1
 
   Private myArray1() As String = New String() {"A", "B", "C"}
   Private myArray2() As String = New String() {"D", "E", "F"}
   Private myArray3() As String = New String() {"G", "H", "I"}
 
 
   Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
     Handles Me.Load
 
      For x As Int16 = 1 To 3
         Me.DataGridView1.Rows.Add(New Object() {"Zeile " & x.ToString, "Wert " _
           & x.ToString})
      Next
   End Sub
 
 
   Private Sub DataGridView1_RowsAdded(ByVal sender As System.Object, ByVal e _
     As System.Windows.Forms.DataGridViewRowsAddedEventArgs) Handles _
     DataGridView1.RowsAdded
 
      Select Case e.RowIndex
         Case 0
            For Each s As String In myArray1
               DirectCast(DataGridView1.Rows(e.RowIndex).Cells(2), _
                 DataGridViewComboBoxCell).Items.Add(s)
            Next
 
         Case 1
            For Each s As String In myArray2
               DirectCast(DataGridView1.Rows(e.RowIndex).Cells(2), _
                 DataGridViewComboBoxCell).Items.Add(s)
            Next
 
         Case 2
            For Each s As String In myArray3
               DirectCast(DataGridView1.Rows(e.RowIndex).Cells(2), _
                 DataGridViewComboBoxCell).Items.Add(s)
            Next
      End Select
   End Sub
End Class

Gru?
---------------------------------------------------
Snoopy sagt - vb@rchiv find ich gut...
Schon gesehen? OSMMapViewer V2 Control