Private Sub Command1_Click()
If Length(Text1.Text) < 5 Then
MsgBox "请输入内容"
End If
这句话怎么弄?? 那里不正确 我就是意思是: 按提交按钮,假如文本框没有输入文本 则提示请输入内容" 请问要怎么弄啊?
Private Sub Command1_Click()
If Length(Text1.Text) < 5 Then
MsgBox "请输入内容"
End If
这句话怎么弄?? 那里不正确 我就是意思是: 按提交按钮,假如文本框没有输入文本 则提示请输入内容" 请问要怎么弄啊?
楼上对了:
Private Sub Command1_Click()
If Text1.Text="" Then MsgBox "请输入内容" End If
我也常这样写,简单!
Private Sub Command1_Click()
If Text1.Text="" Then MsgBox "请输入内容" End If