文本的问题！很简单！

天堂ω狮子心

         问题是这样的，我想在编辑框里面输入一个邮箱号码 比如 469717663@qq.com 但是我想判断一下输入的邮箱号码格式是否正确？  
        首先判断它这个号码里面有没有“@ ”，如果有“@”了再继续向下判断有没有“.”如果两者都没有就信息框提示错误!
        自己已经把思路想好了！但是写了3次都没写出来，所以看看各位有能写出来的 帮助我一下。。给发个代码，或者直接回复，或者给一个更好的思路加代码！   总之呢！因该是个很简单的问题！昂，在我这个问题上能学到什么的其他人呢，也给个好评O(∩_∩)O~谢谢昂！

qq764520536

[e].版本 2
.子程序 _按钮1_被单击
.局部变量 临时文本, 文本型
临时文本 ＝ 编辑框1.内容
.判断开始 (寻找文本 (临时文本, “@”, , 假) ＞ -1 且 寻找文本 (临时文本, “.”, , 假) ＞ -1)
    信息框 (“正确”, 0, )
.判断 (寻找文本 (临时文本, “@”, , 假) ＝ -1 或 寻找文本 (临时文本, “.”, , 假) ＝ -1)
    信息框 (“错误”, 0, )
.默认
.判断结束
[/e]


修改楼上的 = = 呵呵

易团俊

用“@”分割文本  如果分割出来的数组成员数为1。就是木有@

   如果为2   就 寻找文本 数组[2] 里面有木有  “.com”

如果大于2  就是@多了

sf0799

楼上好方法，为什么后面不用分割文本了？也可以判断是不是多了

airpppp

[e].版本 2

.子程序 _按钮1_被单击
.局部变量 临时文本, 文本型

临时文本 ＝ 编辑框1.内容
.判断开始 (寻找文本 (临时文本, “@”, , 假) ＞ -1 且 寻找文本 (临时文本, “.”, , 假) ＞ -1)
    信息框 (“正确”, 0, )
.判断 (寻找文本 (临时文本, “@”, , 假) ＝ -1 且 寻找文本 (临时文本, “.”, , 假) ＝ -1)
    信息框 (“错误”, 0, )
.默认

.判断结束
[/e]

sxm7245443

用寻找文本就可以

airpppp

qq764520536 发表于 2011-10-3 10:10
修改楼上的 = = 呵呵

...如果两者都没有就信息框提示错误...

楼主的要求是这个哈

qq764520536

airpppp 发表于 2011-10-3 10:18
楼主的要求是这个哈

呵呵 我画蛇添足了~~~

爱家的小懒虫

1. .版本 2
   
2. .支持库 RegEx
   
3. 
   
4. .程序集 窗口程序集1
   
5. 
   
6. .子程序 _按钮1_被单击
   
7. .局部变量 正则, 正则表达式
   
8. .局部变量 文本, 文本型
   
9. 
   
10. 文本 ＝ 编辑框1.内容
    
11. 正则.创建 (“\w+@\w+\.(com|cn|net|还要的话可以在这里添加后缀)”, 假)  ' 精确匹配  英文数字@英文数字.com或者cn或者net或者 还要的话可以在这里添加后缀
    
12. .如果真 (正则.匹配 (文本))
    
13.     信息框 (“输入邮箱格式正确”, #信息图标, “匹配正确”)
    
14.     返回 ()
    
15. .如果真结束
    
16. 信息框 (“输入邮箱格式错误”, #信息图标, “匹配失败”)
    

复制代码

虽然楼主只给2分.但是还是尽心帮你做的最好!楼上几位朋友的,如果 输入的邮箱中有中文或者含有多个" @ "和 " . " 并不能报错.

62651345

同意用正则判断。