Vb.net / DataGridView / ComboBox 列

Question

我正在使用 vb.net 和 winforms。

我有一个带有绑定 DataGridView 的表单。在 DGV 上，我有 5 个带 ComboBox 的列。我正在使用 EditingControlShowing Even 来捕捉组合框选择。 （参见下面的代码）。 问题是：

当我单击带有组合框的单元格并进行选择，然后更新底层单元格（单元格=所选值），然后单击 DGV 的另一行时，它就会变得混乱。如果我更新单元格后，我会在数据源的相应行上执行并结束编辑，那么它似乎可以找到。

如何确定相应的数据源行以便我可以自动执行此操作？

Private Sub dataGridView1_EditingControlShowing(ByVal sender As Object, ByVal e As DataGridViewEditingControlShowingEventArgs) _
                Handles DataGridView1.EditingControlShowing
        Try
            Debug.Print("entered the EditingControlShowing")
            Dim ColName As String = Me.DataGridView1.Columns(Me.DataGridView1.CurrentCell.ColumnIndex).Name
            If ColName = "Col1" Then 'Or ColName = "Col2" Or ColName = "Col3" Or ColName = "Col4" Or ColName = "Col5" Then

'the column you want to cast
        Dim cmb As ComboBox = TryCast(e.Control, ComboBox)
            RemoveHandler cmb.SelectedIndexChanged, AddressOf cmb_SelectedIndexChanged
            AddHandler cmb.SelectedIndexChanged, AddressOf cmb_SelectedIndexChanged
        End If
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub

Sub cmb_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs)
    Try
        Me.DataGridView1.Rows(Me.DataGridView1.CurrentRow.Index).Cells(Me.DataGridView1.CurrentCell.ColumnIndex).Value = CType(sender, ComboBox).SelectedItem
        '
        ' HERE IF I PUT MyDataSet.Tables(0).Rows(?).EndEding it works - but how to konw what row?
        '
        UpdateAvgColumn(Me.DataGridView1.CurrentRow.Index)
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
End Sub

Answer 1

被解雇的事件正在重新进入。如果您当前正在处理一个事件，则必须小心不要处理其他事件。如果正在处理不同的事件，则必须在事件处理周围放置 IF 语句以跳过执行代码。

sub dgv_selecteditemchanged()
  If not processing_event
    processing_event = true
    ...
    processing_event = false
  end if
end sub