vb 文本框输入限制

发布网友 发布时间：2024-10-31 21:13

我来回答

共3个回答

热心网友 时间：2024-10-31 21:21

你可以先限制输入纯数字,然后在keypress事件里面对输入后的数值进行判断
例如文本框控件名Text1
private sub text1_keypress(....)
if val(text1)>100 and val(text1)<0 then keyascii = 0 ' 可能也是keycode,根keypress括号里面的变量一致即可

热心网友 时间：2024-10-31 21:16

包括0和100吗?

热心网友 时间：2024-10-31 21:15

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Val(Text1.Text) > 100 Or Val(Text1.Text) < 0 Then
MsgBox "只能输入0-100之间的数"
Text1.Text = ""
End If
End If
End Sub