导航

2011年8月11日

As电子邮件、手机号码有效性验证的函数

摘要： '********************************************'函数名：IsValidEmail'作 用：检查Email地址合法性'参 数：email ----要检查的Email地址'返回值：True ----Email地址合法' False ----Email地址不合法'********************************************Function IsValidEmail(Email) Dim names, name, I, c IsValidEmail = True names 阅读全文

posted @ 2011-08-11 13:51 ykhi 阅读(1152) 评论(0) 推荐(0)