以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [问题]为什么这串代码老是错了? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141597) |
-- 作者:zto001 -- 发布时间:2019/10/6 12:44:00 -- [问题]为什么这串代码老是错了? dim 包号 as String If 包号.Length = 7 Then ’之前是 If 包号 = \'\' Then 和 If 包号 = isnot nothing Then Dim 包s As List(of DataRow) = DataTables("退件扫描").SQLSelect("包号= \'" & 包号 & "\' And 扫描类型=\'生成包号\' or 扫描类型=\'T-已收退件\' ") For Each 包 As DataRow In 包s 快递物流 =快递物流 & Chr(13) & Chr(10) & 包("扫描时间") & " | 【"& 包("上下站") & "】" & 包("扫描人") & "对包" & 包("包号") & "进行:" & 包("扫描类型") & "操作" Next End If 这串代码老是执行包号为空值的数据。判断是否为空没一点用,这是为什么?
|
-- 作者:zoyong -- 发布时间:2019/10/6 13:09:00 -- If 包号 > "" Then If 包(包号) isnot nothing then
[此贴子已经被作者于2019/10/6 13:10:27编辑过]
|
-- 作者:zto001 -- 发布时间:2019/10/6 13:23:00 -- 还是一样 isnot nothing ;>“” ; =“” else 代码 。。这些都是错的都把空值给带进来了 |
-- 作者:zoyong -- 发布时间:2019/10/6 14:25:00 -- 贴出所有代码 |
-- 作者:有点蓝 -- 发布时间:2019/10/6 14:27:00 -- If 包号 > "" andalso 包号.Length = 7 Then
|