男的送兄弟什么礼物好:怎样在一个vb的程序中的文本输入框中限制所输入的内容？

来源：百度文库编辑：杭州交通信息网时间：2024/04/28 08:13:01

具体的是想实现在一个文本输入框中输入0到2000的数字，当输入别的字符时程序显示输入有误的信息。用 VB 6.0 来实现，因为我发现没有这样的属性来控制。

个人认为
如果在“失去焦点”的事件中触发，会在不希望的时候也触发
选用Change较好
Private Sub Text1_Change()
If Not IsNumeric(Text1.Text) Then
MsgBox "不是数字型的！"
Text1.Text = ""
Else
If Val(Text1.Text) < 0 Or Val(Text1.Text) > 2000 Then MsgBox "范围越界！"
Text1.Text = ""
End If
End Sub
搞定～

定义一个文本框失去焦点事件LostFocus（）
失去焦点时写代码判断输入的内容，用正则表达式

怎样在一个vb的程序中的文本输入框中限制所输入的内容？怎样在vb中做一个像word一样能对文本格式进行编辑,且速度快的程序? 怎样在VB中实现在一个文本中不同进制的转换 VB中修改输入文本的字体如何把在VB中输入的文本导入到文本文挡中并保存在Authorware中的文本输入响应的文本输入域中怎样限制Excel单元格中的输入字数，比如：在每个单元格中设定只输入一个字，输入之后就自动转入下一格？在VB中怎么在文本框中实现,输入一个文本或数字,便随机一种颜色呢? 请问在VB中,如何通过单击一个按扭后,左边list1中的文本反向输出? vb中,怎样在文本控件中打开任意一个文本文件(路径由其他控件选取)