养生 装修 购物 美食 感冒 便秘 营销 加盟 小吃 火锅 管理 创业 搭配 减肥 培训 旅游

在vb中,如何使文本框中只允许输入数字

时间:2024-10-01 15:27:09

vb编程中往往要限制文本框中只允许输入数字,防止获取文本框的内容时发生类型不匹配的错误。下面介绍实现限制文本框中只允许输入数字的方法。

在vb中,如何使文本框中只允许输入数字

工具/原料

VisualBasic6.0

方法/步骤

1、新建一个标准EXE程序。

在vb中,如何使文本框中只允许输入数字

2、绘制界面,添加一个Textbox控件,改名为txbNumber。

在vb中,如何使文本框中只允许输入数字

3、编写代码。在代码窗口中,添加txbNumber_KeyPress事件。

在vb中,如何使文本框中只允许输入数字

4、查ASCII码表,得到0的ASCII码是48。输入以下语句:IfKeyAscii<48OrKeyAscii>57ThenKeyAscii=0这条语句用来判断输入的字符是否在0-9的范围,如果不在这个范围,就把这个输入的字符屏蔽掉。

在vb中,如何使文本框中只允许输入数字

5、但这么做会产生一个问题,就是使用BackSpace删除字符的时候,由于按键被屏廿憾轴抖蔽,无法删除。怎么解决呢?解决方法很简单,只要在上面的语句前在添加一条语句:I熠硒勘唏fKeyAscii=8ThenExitSub意思是,如果按了BackSpace,就直接退出该过程,按键就不会被屏蔽了。

在vb中,如何使文本框中只允许输入数字

6、调试运行。按F5,在文本框中输入任意字符,可以看到只有数字能显示在文本框中。按退格键,字符也能正常删除。

在vb中,如何使文本框中只允许输入数字

7、如果输入的数字可能是小数,那么还要添加跗柿椁焚如下代码:IfKeyAscii=46AndNotCBool(InStr(txbNum芟鲠阻缒ber,"."))ThenExitSub当输入小数点时,程序判断文本框中是否已有小数点(因为一个小数中不可能有多个小数点),如果没有小数点,则允许输入。

在vb中,如何使文本框中只允许输入数字

© 一点知识