DataGridViewComboBoxColumn

Hi I am using a DataGridView with one DataGridViewComboBoxColumn, When I click on the ComboBox nothing happens

If I click on it the second time then I get a drop down list. My code is as follows:

        Dim DgCombo1 As New DataGridViewComboBoxColumn

        Dim adapter2 As New OleDbDataAdapter()
        Dim ds2 As New DataSet()
        Dim MySql2 = "Select * FROM STOCK ORDER BY NAME"
        MyCn.Open()
        Dim Cmd2 = New OleDbCommand(MySql2, MyCn)
        adapter2.SelectCommand = Cmd2
        adapter2.Fill(ds2)
        adapter2.Dispose()
        Cmd2.Dispose()
        MyCn.Close()

        Grid1.Columns.Insert(0, DgCombo1)
        With DgCombo1
            .HeaderText = "Code"
            .DataSource = ds2.Tables(0)
            .DisplayMember = "NAME"
            .ValueMember = "CODE"
        End With
        Grid1.Columns.Add("ITEM", "Item")
        Grid1.Columns.Add("QTY", "Qty.")
        Grid1.Columns.Add("UNIT", "Unit")
        Grid1.Columns.Add("AMOUNT", "Amount")
        Grid1.Columns(1).Width = 200
        Grid1.Columns(2).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
        Grid1.Columns(3).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight
        Grid1.Columns(4).DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleRight

---

Navin