VB中如何判断textbox中的值发生了变化，新手
展开全部
Private Sub Text1_Change()
Dim S as string
S=Text1.text
If Len(S)>0 Then
If Val(S)<=0 Then Msgbox "请输入一个正整数"
End If
End Sub
Dim S as string
S=Text1.text
If Len(S)>0 Then
If Val(S)<=0 Then Msgbox "请输入一个正整数"
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
textbox中的值发生变化会触动Change事件
Private Sub Text1_Change()
End Sub
Private Sub Text1_Change()
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
TextBox Change事件:
TextBox的文字发生变化．
TextBox的文字发生变化．
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
