以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  验证数字或字符的位数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=9804)

--  作者:yeyun
--  发布时间:2011/5/8 17:25:00
--  验证数字或字符的位数
请问,怎样通过事件验证输入的内容的位数,例如手机号码:必须是11位,不可多,也不可少!
--  作者:狐狸爸爸
--  发布时间:2011/5/8 17:36:00
--  

Dim s as string = "13800138000"

IF s.Length <> 11 Orelse IsNumeric(s) = False Then

    messagebox.show("无效手机号码!")

End If