vb文本框数组如何只能读取数字

1、第一步，我们 新建一个EXE程序。

3、第三步编写代码。在代码窗口中，添加txbNumber_KeyPress事件。

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

7、如果输入的数字可能是小数，那么还要添加如下代码： If KeyAscii = 46 And Not CBool(InStr(txbNu罪焐芡拂mber, ".")) Then Exit Sub；当输入小数点时，程序判断文本框中是否已有小数点（因为一个小数中不可能有多个小数点），如果没有小数点，则允许输入。