Adding combobox column as the second column in the data grid of 5 columns. Combo box contains data from table in msaccess database.

Private Sub frmInvoice_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim strSql1 As String
        Dim combo As New DataGridViewComboBoxColumn()
        strSql1 = "Select ItemAutoID, ItemName from ItemMaster"

        Try
            conn.Open()
            With com
                .CommandType = CommandType.Text
                .CommandText = strSql1
                .Connection = conn
            End With
            adp.SelectCommand = com
            adp.Fill(dt)
            adp.Dispose()
            com.Dispose()
            conn.Close()

            With combo
                .HeaderText = "Item Name"
                .Name = "combo"
                .DisplayMember = "ItemName"
                .ValueMember = "ItemAutoID"
            End With
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        DataGridView1.ColumnCount = 5
        DataGridView1.Columns(0).Name = "Sr. No."
        DataGridView1.Columns.Add(combo)
        DataGridView1.Columns(2).Name = "Uom"
        DataGridView1.Columns(3).Name = "Qty"
        DataGridView1.Columns(4).Name = "Rate"
        DataGridView1.Columns(5).Name = "Value"


        

    End Sub