单元格输入 - 操作无效，因为它导致对SetCurrentCellAddressCore函数的可重入调用

Question

var fs = require('fs'); var arr = [ [ 'text1' ],[ 'text2', 'text34','text444'],[ 'text3243', 'abc' ]] var file = fs.createWriteStream('newFile.txt'); file.on('error', function(err) { /* Use error handler */ }); arr.forEach(function(item) { file.write(item.join(',') + '\n'); }); file.end(); 如果我执行此操作会出现此错误：

Cell enter - Operation is not valid because it results in a reentrant call to the SetCurrentCellAddressCore function

我只想阻止用户在Private Sub dg1_CellEnter(sender As Object, e As DataGridViewCellEventArgs) Handles dg1.CellEnter if e.columnindex = 4 if dg1.CurrentRow.Cells("id").Value = 0 dg1.endEdit(true) msgbox("choose any item in cell3 before you can proceed here") dg1.CurrentCell = dg1.CurrentRow.Cells(3) exit sub end 'my code here . . . end if End Sub 中输入或执行我的代码 没有选择cell 4

中的任何项目

当用户在cell 3中选择一个项目时，cell 3的值将取决于cells("id")值的ID。但是当我点击cell 3时会出现错误。

谁能解决这个问题？提前谢谢

Answer 1

您获得可重入异常的原因是设置当前单元格将强制触发CellEnter事件。要避免此异常，请将其添加到您的代码中：

Delegate Sub SetColumnIndex(ByVal i As Integer)

Private Sub Mymethod(ByVal columnIndex As Integer)
    dg1.CurrentCell = dg1.CurrentRow.Cells(columnIndex)
End Sub

然后在你的代码中：

if dg1.CurrentRow.Cells("id").Value = 0
   msgbox("choose any item in cell3 before you can proceed here")
   Dim method As New SetColumnIndex(AddressOf Mymethod)
   dg1.BeginInvoke(method, 3)
   Exit Sub
end if

如果这不起作用，请通知我。