以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  按钮判断空值  (http://www.foxtable.com/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
--  

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

 

你的代码没问题。