以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何判断表中 某字段有空值?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60197)

--  作者:jswjyjf
--  发布时间:2014/11/19 21:42:00
--  如何判断表中 某字段有空值?
如何判断表中 某字段有空值? 提示信息出来
--  作者:有点甜
--  发布时间:2014/11/19 21:43:00
--  

 If 某行.IsNull("某列") Then

     Msgbox(1)

 End If


--  作者:jswjyjf
--  发布时间:2014/11/19 21:45:00
--  

这样的话 要用遍历了


--  作者:有点甜
--  发布时间:2014/11/19 21:50:00
--  

Dim filter As String = "1=2"
For Each dc As DataCol In DataTables("表A").DataCols
    filter &= " or " & dc.Name & " is null "
Next

If DataTables("表a").Find(filter) IsNot Nothing Then
    msgbox("有空值")
End If


--  作者:jswjyjf
--  发布时间:2014/11/19 22:07:00
--  

For Each r As Row In Tables("销售单明细").Rows
If r.isnull("颜色") = True Then
msgbox("f")
End If
Next

 

 

明明有空值 为何没反应


--  作者:有点甜
--  发布时间:2014/11/19 22:08:00
--  

 不可能吧,试试

 

For Each dr As DataRow In DataTables("销售单明细").DataRows
    If dr.isnull("颜色") = True Then
        msgbox("f")
    End If
Next

 


--  作者:jswjyjf
--  发布时间:2014/11/19 22:10:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20131105200601.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2014/11/19 22:12:00
--  

For Each dr As DataRow In DataTables("销售单明细").DataRows
    If dr.isnull("颜色") = True OrElse dr("颜色").Trim = "" Then
        msgbox("f")
    End If
Next


--  作者:jswjyjf
--  发布时间:2014/11/19 22:14:00
--  

不行

 


--  作者:有点甜
--  发布时间:2014/11/19 22:15:00
--  
 例子。