Private Sub LoadDataGrid_New()
        ' Create an unbound DataGridView by declaring a column count.
        Dim Row0 As String = ""
        Dim Row1 As String = ""

        'Dim Row0 As String() = {""}
        'Dim Row1 As String() = {""}
        ''Dim Row2 As String() = {""}

        With Me.DataGridView1.Rows
            .Add(Row0)
            .Add(Row1)
            '.Add(Row2)
        End With

    End Sub

    Sub PopulateColorRow()

        Dim myDB As New OleDb.OleDbConnection(sConnectionString)
        Dim myDA As New OleDb.OleDbDataAdapter("Select ColorId,Color from tblColors order by Color", myDB)
        Dim myDS As New Data.DataSet
        Dim cbn As DataGridViewComboBoxColumn = DirectCast(DataGridView1.Columns(0), DataGridViewComboBoxColumn)
        'Dim cbn1 As DataGridViewComboBoxColumn = DirectCast(Me.DataGridView1.Columns.Item(2), DataGridViewComboBoxColumn)


        'DataGridView1.Rows(0).Cells(0).Value = "COLOR"
        'DataGridView1.Rows(1).Cells(0).Value = "BRIGHTNESS"

        myDA.Fill(myDS, "tblColors")

        With cbn
            .DataSource = myDS.Tables("tblColors")
            .DisplayMember = "Color"
            .ValueMember = "ColorId"
        End With

        myDB.Close()

    End Sub