- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 集合空值判断 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=186602)
-- 发布时间：2023/5/15 11:10:00
-- 集合空值判断
老师您好！
我有个集合空值怎么判断？我用nothing和null 都报错，请指教，谢谢！
Dim brys As List(Of String)
brys = DataTables("ddpsb").GetValues("zzh|zzh_xx|发货日期", "zzh is not null")
For Each bry As String In brys
For Each dr2 As DataRow In DataTables("ddqdb").Select("zzh=\'" & brys(0) & "\'") \'找到符合条件的所有记录
Dim s As String = dr2("zzh_yy")
Dim syy As String = Right(s, 2)
\' If bry(1) Is Not nothing And syy = bry(1) Then
\' Dim dr3 As DataRow = DataTables("临时表").AddNew()
\' If dr2.IsNull("清单条码编码") = False Then
\' dr3("清单条码编码") = dr2("清单条码编码")
\' dr3("发货日期") = bry(2)
\' End If
\' Else
\' Dim dr4 As DataRow = DataTables("临时表").AddNew()
\' If dr2.IsNull("清单条码编码") = False Then
\' dr4("清单条码编码") = dr2("清单条码编码")
\' dr4("发货日期") = bry(2)
\' End If
\' End If
Next
Next
-- 发布时间：2023/5/15 11:25:00
--
Dim brys As List(Of String())
此主题相关图片如下：1.png