以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 窗口日期判断 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5139) |
-- 作者:wqc360 -- 发布时间:2009/11/25 17:55:00 -- 窗口日期判断 请帮我看看,一下代码问题出在哪里: 在窗口有3个文本框和一个一个日期输入框,要判断空值提示,不空往下运行。我在删除日期输入框:(计划日期)时,可以运行(会面还有很多公式) Dim Values As String() = {"(订单号)","(生产单号)","(计划数量)","(计划日期)"} For Each Va as string In Values with e.form if .Controls(va).value = "" then MessageBox.Show(va &" 资料不全,请录入!", "提示") end if end with Next |
-- 作者:狐狸爸爸 -- 发布时间:2009/11/25 17:58:00 -- if .Controls(va).value Is Nothing then |
-- 作者:wqc360 -- 发布时间:2009/11/25 18:04:00 -- 好快,谢谢 |