主题：[求助]表事件

老师  您好

   表设置了复选框，AfterCheckRow事件代码如下，当我删除行时，出现下图错误。请问要怎么修改代码？ 谢谢

If e.Row.Checked  Then
    For Each r As Row In e.Table.GetCheckedRows '遍历所有已经勾选的行
        If r("_Identify") <> e.Row("_Identify") Then '如果不是本行
            r.Checked  = False '取消勾选此行
        End If
    Next
End If

 

 

此主题相关图片如下：121dsgjhkttyt.jpg