判断多个文本内容为空时，弹出MSGBOX应何如写

sunny-xie

如：现在要判断的条件有
编号，名称，单号，日期等，
要判断他们的值有一个或者多个为空时，弹出“请输XXX”，如果都不为空就弹出“保存成功”
if isnull(me.编号) then
   msgbox "请输入编号"
  else
        msgbox "保存成功"
end if

多个怎样判断？

盗到稻

if isnull(me.编号) then
       msgbox "请输入编号"
        me.编号.SetFocus
       exit sub
end if
if isnull(me.名称) then
       msgbox "请输入名称"
        me.名称.SetFocus
       exit sub
end if
if isnull(me.单号) then
       msgbox "请输入单号"
        me.单号.SetFocus
       exit sub
end if
if isnull(me.日期) then
       msgbox "请输入日期"
        me.日期.SetFocus
       exit sub
end if

msgbox "保存成功"

sunny-xie

不是用AND来连接。。
累计日期那个问题能帮忙解决吗？
http://www.office-cn.net/forum.php?mod=viewthread&tid=57337