主题：[求助]这个代码Foxtable为什么会停止？

DataColChanged

 

Select Case e.DataCol.Name
    Case "收发文类型","文件转发"
        If e.DataRow.IsNull("收发文类型") AndAlso e.DataRow("收发文类型") =  "收文"  AndAlso e.DataRow.Isnull("收文部门")  Then
            e.DataRow("文件转发") = True      ‘这一列是逻辑列
        Else
            e.DataRow("文件转发") = False
        End If
End Select

死循环.你改变文件转发的值.触发DatacolChange事件 事件里面又改变它的值.死循环

If e.DataRow.IsNull("收发文类型") AndAlso e.DataRow("收发文类型") =  "收文"  AndAlso e.DataRow.Isnull("收文部门")  Then
翻译成普通话，就是：如果为空e.DataRow.IsNull("收发文类型") ，并且不为空e.DataRow("收发文类型") =  "收文" 

AfterEdit

  ’放在这儿也不行，头短路了，这么简单的事也搞不定

If e.Col.Name = "收发文类型"
        If e.Row.IsNull("收发文类型") AndAlso e.Row("收发文类型") =  "收文"  AndAlso e.Row.Isnull("收文部门")  Then
            e.Row("文件转发") = True
        Else
            e.Row("文件转发") = False
        End If
End If

休息一会，清醒下脑子！

谢谢，明白了！