58问答库 > VB中，如果文本框中没有输入东西，就点命令按钮，如何弹出对话框提示？

VB中，如果文本框中没有输入东西，就点命令按钮，如何弹出对话框提示？

2024-12-01 10:46:09

推荐回答（3个）

回答（1）：

Private sub Command1_Click()
if Trim(text1)="" then
Msgbox "请输入XXX",Vbcritical,"提示" (弹出对话框）
text1="" （清空文本框内容）
text1.Setfocus （文本框获得输入焦点)
end if
End Sub
注意：当中的Trim()作用为去除其括号内对象内容两端的空格，最好不要省略，因为用户有可能会在该对象（如例中的文本框）内输入空格后点击命令按钮，此时，若省略了trim(),则就会得出错误的处理过程。

回答（2）：

if text1.txt="" then
msgbox
end if

回答（3）：

Private sub Command1_Click()
if text1.text="" then
Msgbox "xx不能为空"
end if
End Sub