以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- findrow的这段代码哪里错了? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=107185) |
-- 作者:huangxueyao -- 发布时间:2017/9/22 19:23:00 -- findrow的这段代码哪里错了? With Tables("副-分拣扫码窗_table1") .Position = 0 If .Current("实发量") = "" Then Forms("副-分拣输入窗").open Else MessageBox.show("部分客户已经分拣过了,现自动从尚未分拣的客户开始") Dim r As Integer r = .FindRow("[实发量] = \'\'") \'从 第一行开始查找 If r >= 0 Then \'如果找到的话 .Position = r \'定位到找到的行. Forms("副-分拣输入窗").open End If End If End With 很奇怪,能够执行到findrow这句,说明存在符合条件的行,但是r都是返回-1,怎么回事?是不是副表不能用findrow? |
-- 作者:huangxueyao -- 发布时间:2017/9/22 19:50:00 -- 明白了,应该是空值的判断出错了,要用is null |