|
发表于 2010-1-17 23:55:58
|
显示全部楼层
湖北省襄阳市
- .版本 2
- .程序集 窗口程序集1
- .子程序 _按钮1_被单击
- .局部变量 分割, 文本型, , "0"
- .局部变量 分割1, 文本型, , "0"
- .局部变量 n, 整数型
- .局部变量 n1, 整数型
- 编辑框_账号.内容 = “”
- 编辑框_密码.内容 = “”
- 分割 = 分割文本 (编辑框_数据.内容, #换行符, )
- .计次循环首 (取数组成员数 (分割), n)
- 分割1 = 分割文本 (分割 [n], “ ”, )
- 编辑框_密码.加入文本 (取文本右边 (分割 [n], 取文本长度 (分割 [n]) - 倒找文本 (分割 [n], “ ”, , 假)) + #换行符)
- .计次循环首 (取数组成员数 (分割1), n1)
- .如果真 (寻找文本 (分割1 [n1], “@”, , 假) ≠ -1)
- 编辑框_账号.加入文本 (到文本 (n) + “=” + 分割1 [n1] + #换行符)
- .如果真结束
- .计次循环尾 ()
- .计次循环尾 ()
复制代码 这些是数据- 1=5区 周国 123 283477888@qq.com 1111111111
- 2=5区 周国 123 xiangni_69@yahoo.com 1111111111
- 3=5区 周国 123 283477860@qq.com 1111111111
- 4=5区 周国 123 65271855@qq.com 1111111111
- 5=5区 周国 123 wzz080@163.com 1111111111
- 6=5区 周国 123 4571461631@qq.com 1111111111
- 7=5区 周国 123 renyuanlin1@163.com 1111111111
- 8=5区 周国 123 lidengpan004@126.com 1111111111
- 9=5区 周国 123 cowboy1234@163.com 1111111111
- 10=5区 周国 123 echengxiaoping@126.com 1111111111
复制代码 |
|