ต้องการคลิกที่ DataGridView มาโชว์ใน combobox (VB)

Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick
        With DataGridView1
            TbProID.Text = CStr(.Rows.Item(e.RowIndex).Cells(0).Value)
            TbProName.Text = CStr(.Rows.Item(e.RowIndex).Cells(1).Value)
            ComboBox3.Text = CStr(.Rows.Item(e.RowIndex).Cells(2).Value)
            ComboBox4.Text = CStr(.Rows.Item(e.RowIndex).Cells(3).Value)
            TbPrice.Text = CStr(.Rows.Item(e.RowIndex).Cells(2).Value)
            LblStock.Text = CStr(.Rows.Item(e.RowIndex).Cells(3).Value)
            
        End With
        Panel1.Visible = False
        TBAmount.Focus()

    End Sub