标题：按钮单击后验证输入内容

请问，如果实现单击按钮后，可以实现验证功能，例如：验证输入的内容是否是数字，输入的内容是否是字母，输入的是内容是否是邮箱等等

是否数字：

 

Dim s1 As String = "123"
Dim s2 As String  = "abc"
Output.show(IsNumeric(s1))
Output.show(IsNumeric(s2))

 

非数字就是字母了吧？

 

是否邮箱:

 

Dim s1 As String  = "abc@21cn.com"
If s1 Like "*@*.*[a-z]" Then
    messagebox.show("是邮件地址")
End If

邮箱那个会明白，但数字那个还不怎么明白，比如在窗口的文本框中输入内容，然后单击按钮后怎样判断是不是数字啊？

就是用IsNumeric判断，仔细看看这节的内容：

http://help.foxtable.com/topics/1514.htm