Question

VB6.0 如何让Text中不能输入中英文？（就是只能输入数字）

编一个计算器。Text只能等于数字。不是数字的话计算之后程序就会崩溃 其实英文我也不想让他输入。但是英文至少可以让If Text=”a“ Then（26字母其中一个）Form2.ShowEnd If这就行了。。但是太麻烦。。所以如何不输入英文也说下吧。

Answer 1

你可以通过ASCII来判断输入嘛。很简单的。做计算器都是用button来做的啊，不需要点击的。你看看系统自带的计算器呢

Answer 2

这样写:在text的change事件中,Private sub Text1_change()if not isnumric(text1) thenmsgbox "只能输入数字"text1=""end ifend sub