你可以通过ASCII来判断输入嘛。很简单的。做计算器都是用button来做的啊，不需要点击的。你看看系统自带的计算器呢
这样写:在text的change事件中,Private sub Text1_change()if not isnumric(text1) thenmsgbox "只能输入数字"text1=""end ifend sub
