以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]代码错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124341)
--  作者：manyifuwu
--  发布时间：2018/9/4 18:23:00
--  [求助]代码错误

.NET Framework 版本：2.0.50727.8935
Foxtable 版本：2018.8.30.1
错误所在事件：表，派工，AfterEdit
详细错误信息：
调用的目标发生了异常。
未将对象引用设置到对象的实例。

 

Dim cs As String = "付款方式,业务途径,收款"
Dim r As Row = Tables("派工").Current
Dim flag As Boolean = False
For Each c As String In cs.Split(",")
    If r.IsNull(c) Then
        flag = True
        Exit For
    End If
Next
If flag Then
    r("是否") = "False"
Else
    r("是否") = "True"
End If

 

 

 

代码那错了。？？
--  作者：有点蓝
--  发布时间：2018/9/4 20:20:00
--  
代码放到datacolchanged事件

Select Case e.DataCol.name
    Case "付款方式","业务途径","收款"
        e.DataRow("是否") = Not( e.DataRow.Isnull("付款方式") OrElse e.DataRow.Isnull("业务途径") OrElse e.DataRow.Isnull("收款"))
End Select