我想在用户少输入某个数据时用msgbox提示，在用户输入完整后再继续！

那就用啊..

我就是不知道怎么才能暂停才问的！

dim a as integer
a=inputbox("请输入一个大于10的正整数")
if a <=10 then
do
msgbox "你输入的数错误"
a=inputbox("请输入一个大于10的正整数")
loop while a > 10
end if

对文本框的lostfoucs事件里判断输入是否正确,如果输入错误则msgbox并且用setfocus将焦点保持在文本框上,比方说:

Private Sub text1_LostFocus()
If Text1.Text = "" Then
MsgBox ("输入错误")
Text1.SetFocus
End If
End Sub

谢谢各位！
5楼的方法不错！

我又学了一点东西

if text1.text <> "" and text2.text <> "" ... then
通过
else
MsgBox ("输入错误")
end if