以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  空值判断  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192644)

--  作者:13775189031
--  发布时间:2024/7/9 9:26:00
--  空值判断
请教老师,如何增加判断,若某单元格为空,则无法存盘,并有提示信息
--  作者:有点蓝
--  发布时间:2024/7/9 9:33:00
--  
BeforeSaveDataRow事件

If e.DataRow.isnull("某列")  Then \'判断是否不符合验证要求
    MessageBox.Show(
"
某列不能为空","存盘失败",MessageBoxButtons.OK,MessageBoxIcon.Exclamation) \'提示用户
    e.Cancel = 
True \'取消存盘
End
 
If

--  作者:13775189031
--  发布时间:2024/7/9 9:55:00
--  
已经在datarowadded 中设置了增加行后保存,能否改成关闭系统前提示


--  作者:有点蓝
--  发布时间:2024/7/9 10:00:00
--  
http://www.foxtable.com/webhelp/topics/0668.htm
--  作者:13775189031
--  发布时间:2024/7/9 10:07:00
--  
能不能为空,提示后不能关闭项目,必须不为空才能关闭项目
--  作者:有点蓝
--  发布时间:2024/7/9 10:19:00
--  
BeforeCloseProject事件

If DataTables("表B").Find("[状态] Is Null") Isnot Nothing Then
   
Messagebox.Show("存在状态列为空的记录,不能关闭项目?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
e.Cancel = True \'取消关闭项目
End
 If