魔兽世界封号解封淘宝:关于vb怎么让他text中只能输入数字,而不要输入汉字或字母

来源：百度文库编辑：杭州交通信息网时间：2024/05/07 18:30:14

我是刚刚才开始自己学习vb的有好多东西不理解还请大家多多帮忙
在此谢谢了
好象不可以呀
你自己试过吗???

Dim N As Long '用于保存输入的数字，当输入的含有非数字时用该值恢复
Private Sub Form_Load()
If IsNumeric(Text1.Text) Then '当文本框中全是数字时将其赋值给N
N = CLng(Text1.Text)
Else '否则将文本框的初值设为0
Text1.Text = "0"
N = 0
End If
End Sub

Private Sub Text1_Change()
If IsNumeric(Text1.Text) Then '当文本框中全是数字时将其赋值给N
N = CLng(Text1.Text)
Else '否则将文本框恢复为上一次的合法值（数字）
Text1.Text = CStr(N)
End If
End Sub

我试过的
在text的KEYPRESS事件里加这个
If InStr(1, "0123456789.", UCase(Chr(KeyAscii)), 1) <= 0 Then
KeyAscii = 0
End If

Private Sub Command1_Click()
If Asc(Text1.Text) > 57 Or Asc(Text1.Text) < 47 Then
MsgBox "只能输入数字"
End If
End Sub

Private Sub Form_Load()
Text1.Text = ""
End Sub

关于vb怎么让他text中只能输入数字,而不要输入汉字或字母 VB.NET中怎么样让textbox控件中只能输入数字 vb 中怎么使用控件TextBox让输入完数字后自动跳转？？ vb 中怎么使用控件TextBox让输入完数字后自动跳转？？ vb中怎样判断text中输入的是整数。我想用JAVASCRIP判断TEXT里的输入的只能是数字和-符号.怎么写啊? 如何在VB中使TEXTBOX只能输入[数字逗号和句号] 如何在VB中使TEXTBOX只能输入数字,并支持Ctrl+V粘贴? 关于VB的TEXT vb中怎样让text控件内容换行显示啊？