Question

VB用IF语句怎么判断textbox1.text中的是否全部为数字。这么编写

VB用IF语句怎么判断textbox1.text中的是否全部为数字。这么编写。求个高手教我下。再留个QQ。谢谢啦

Answer 1

if isnumeric(textbox1.text) then
msgbox "是数字"
else
msgbox "不是数字"
end if

或者

if cstr(val(textbox1.text))=trim(textbox1.text) then
msgbox "是数字"
else
msgbox "不是数字"
end if

Answer 2

另类方法,在textbox属性里设置输入法状态
另外可用
if textbox1.text = value(textbox1.text) then
msgbox "是数字"
else
msgbox "非数字"
endif

Answer 3

if isnumeric(textbox1.text)=false then
msgbox "不是数字"
end if