Vb.net 始终在Datagridview中填充CheckboxColumn

我有2个

Datagridview

，即Datagridview 1和2。第一个通过表单加载填充，第二个将基于选中的

Datagridview

填充

以下是我正在使用的代码：

Dim checkBoxColumn As New DataGridViewCheckBoxColumn()
        Dim i As Integer
        i = DataGridView1.CurrentRow.Index
        Dim con As MySqlConnection = New MySqlConnection("server=localhost;userid=root;password=admin1950;database=fulldatabase")
        Dim sql As MySqlCommand = New MySqlCommand("select SubControls from subpriv where mainformname = '" & DataGridView1.Item(0, i).Value & "';", con)
        Dim ds As DataSet = New DataSet
        Dim adapter As MySqlDataAdapter = New MySqlDataAdapter
        con.Open()
        adapter.SelectCommand = sql
        adapter.Fill(ds, "MyTable")
        DataGridView2.DataSource = ds.Tables(0)
        con.Close()
            checkBoxColumn.HeaderText = "Approve"
            checkBoxColumn.Width = 120
            checkBoxColumn.Name = "checkBoxColumn"
            DataGridView2.Columns.Insert(0, checkBoxColumn)

但我的问题是，每次在DatagridView1中选择时，我的代码总是填充

checkboxcolumn

---

我的问题是，如何才能限制为1

Checkboxcolumn

我想您应该使用CellContentClick事件，在这种情况下，我将执行以下操作：

Private Sub dgvdatos_CellContentClick(sender As DataGridView, e As DataGridViewCellEventArgs) Handles dgvdatos.CellContentClick
    If TypeOf (sender.CurrentCell) Is DataGridViewCheckBoxCell And e.RowIndex = 0 Then
  'DO STUFF
End If End Sub