判断输入非空,然后返回窗口等待用户再输入,然后再判断(50分求救),该怎么处理

判断输入非空,然后返回窗口等待用户再输入,然后再判断(50分求救)
我是新手,搞了一个简单程序,界面上有一个输入框,希望能实现的功能是,如果输入框里没有内容,而用户点 "提交 "的话,则弹出MSGBOX,告诉用户,然后用户把MSGBOX点消失后,回到界面,继续等待,直到输入框中有内容,判断停止.

现在的问题是,我用if   inputa= " "   then;   msgbox "不能为空! ".....

可以实现在没有内容的时候,弹出警告框,但是却不能让程序停下来,回到界面,继续等待输入,
这个问题该怎么解决啊!

谢谢!

------解决方案--------------------
if len(inputdata)=0 then
msgbox "输入不能为空! "vbinformatin, "提示 "
txtinputdata.setfocus
exit sub
end if

------解决方案--------------------
是不是加了不必要的循环了

只用楼上代码就可以了，但还得补充点

private sub 提交_click()
if len(inputdata)=0 then
msgbox "输入不能为空! "vbinformatin, "提示 "
txtinputdata.setfocus
exit sub
end if
……　(在这里写验证代码)
end sub