以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于加判断保存条件的代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85057)
|
-- 作者:scofields
-- 发布时间:2016/5/16 18:58:00
-- 关于加判断保存条件的代码
红袍老师,我想在保存按钮中加入一个判断条件,如某某为空时,弹出提示框,提示“某某不能为空”,这个代码怎么写?见下图,保存时“数量”与“包装”均不能为空!
|
-- 作者:scofields
-- 发布时间:2016/5/16 18:59:00
--
此主题相关图片如下:判断保存.jpg
|
-- 作者:大红袍
-- 发布时间:2016/5/16 19:35:00
--
比如代码
If Tables("表A").FindRow("数量 is null) >= 0 Then
Msgbox("数量不能为空")
return
End If
|
-- 作者:scofields
-- 发布时间:2016/5/16 20:39:00
-- 回复:(大红袍)比如代码 If Tables("表A")...
红袍老师,运行错误,如图:
|
-- 作者:scofields
-- 发布时间:2016/5/16 20:40:00
--
此主题相关图片如下:运行错误.png
|
-- 作者:大红袍
-- 发布时间:2016/5/16 21:10:00
--
If Tables("表A").FindRow("数量 is null") >= 0 Then
Msgbox("数量不能为空")
Return
End If
|
-- 作者:wyz20130512
-- 发布时间:2016/5/16 21:13:00
--
If Tables("表A").FindRow("数量 is null") >= 0 OrElse Tables("表A").FindRow("包装 is null") >= 0 Then
Msgbox("数量或包装不能为空")
return
End If
试试!(3楼漏了个双引号)
[此贴子已经被作者于2016/5/16 21:15:01编辑过]
|
-- 作者:scofields
-- 发布时间:2016/5/16 21:25:00
-- 回复:(wyz20130512)If Tables("表A").FindRow("数量...
感谢指导!这样下来,数据好像保存到数据库里面了啊,能不能在没有录完实现数据不保存到数据库,并使“新增计划”的Enable属性为False?
|
-- 作者:scofields
-- 发布时间:2016/5/16 21:25:00
-- 回复:(大红袍)If Tables("表A").FindRow("数量 is ...
感谢指导!这样下来,数据好像保存到数据库里面了啊,能不能在没有录完实现数据不保存到数据库,并使“新增计划”的Enable属性为False?
|
-- 作者:大红袍
-- 发布时间:2016/5/16 21:27:00
--
save代码写在最后面,不执行save不会保存的啊。
|