以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  按钮判断空值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95405)
--  作者：npcwu
--  发布时间：2017/1/18 19:55:00
--  按钮判断空值
做了一个窗口用于输入数据，为防止空值输入，在确定按钮时对输入值进行判断是否为空值，如果几个输入值都有数据，则保存退出，如果有一个空值就弹出对话框提示用户，且删除新增加的行。代码怎么写？



已解决！！！已用下面的代码解决，但总感觉那里不对劲。请帮忙看看！！怎么个优化

If CurrentTable.Current.IsNull("第一列") OrElse CurrentTable.Current.IsNull("第二列") OrElse CurrentTable.Current.IsNull("第三列") Then
    Tables("表A").Current.Delete
    Forms("窗口1").Close()
    MessageBox.Show("【第一行】【第二行】【第三行】不能为空.请重新输入!!!")
Else
    Forms("窗口1").Close()
End If
[此贴子已经被作者于2017/1/18 20:29:04编辑过]
--  作者：有点色
--  发布时间：2017/1/19 0:25:00
--  

为什么要生成新增的行并关闭窗口？再修改一下再保存不行？

 

你的代码没问题。