Private Sub Command1_Click()
If Length(Text1.Text) < 5 Then
MsgBox "请输入内容"
End If
这句话怎么弄？？ 那里不正确 我就是意思是： 按提交按钮，假如文本框没有输入文本 则提示请输入内容" 请问要怎么弄啊？
vb代码问题 我不知道怎么回事
答案:3 悬赏:0 手机版
解决时间 2021-06-03 16:14
- 提问者网友：贪了杯
- 2021-06-03 12:53
最佳答案
- 五星知识达人网友：孤独的牧羊人
- 2021-06-03 13:22
Private Sub Command1_Click()
If Len(Text1.Text) < 5 Then '函数名是Len而不是Length
MsgBox "NO"
End If
End Sub
If Len(Text1.Text) < 5 Then '函数名是Len而不是Length
MsgBox "NO"
End If
End Sub
全部回答
- 1楼网友：长青诗
- 2021-06-03 14:18
楼上对了：
Private Sub Command1_Click()
If Text1.Text="" Then MsgBox "请输入内容" End If
我也常这样写，简单！
- 2楼网友：几近狂妄
- 2021-06-03 13:36
Private Sub Command1_Click()
If Text1.Text="" Then MsgBox "请输入内容" End If
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯