isnummeric就是一个判断函数 你就直管调用就成 返回true就是数值 返回false就不是 楼上已经给的很好了
if IsNumeric(text1.text) thenmsgbox "是数字"elsemsgbox "不是数字"end if
