以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69119)
--  作者：q2649295605
--  发布时间：2015/5/30 21:06:00
--  代码错误
If e.DataRow.isnull("水平_X方向")=False Then
    e.Row("待发状态") = True  
End If


有什么地方错了吗？
--  作者：q2649295605
--  发布时间：2015/5/30 21:41:00
--  
If e.DataRow.isnull("清洁")=False AndAlso e.DataRow.isnull("编号")=False AndAlso e.DataRow.isnull("水平_X方向")=False AndAlso....... Then
    e.DataRow("待发状态") = True
MessageBox.Show("此机可以发货")
End If
 红的地方可以用其他简单简洁的代替了吗？》
--  作者：大红袍
--  发布时间：2015/5/31 10:23:00
--  
Dim cs() As String = {"清洁", "编号"}
Dim flag As Boolean = True
For Each c As String In cs
    If e.DataRow.Isnull(c) Then
        flag = False
        Exit For
    End If
Next
If flag Then
    e.DataRow("待发状态") = True
    MessageBox.Show("此机可以发货")
End If