|
5精币
本帖最后由 liubanxian 于 2014-8-25 14:43 编辑
.版本 2
.支持库 spec
.局部变量 邮箱名, 文本型
.局部变量 密码, 文本型
.局部变量 计次, 整数型
.局部变量 邮箱名字母, 文本型, , "0"
.局部变量 密码字母, 文本型, , "0"
普通填表.初始化 (超文本浏览框.取窗口句柄 ())
.计次循环首 (取随机数 (6, 15), 计次)
.判断开始 (计次 = 1)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (65, 90)))
.判断 (计次 = 2)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 3)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 取随机数 (4, 6))
邮箱名 = 邮箱名 + 到文本 (字符 (95))
.判断 (计次 = 4)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 5)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 6)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 7)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 8)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 取随机数 (4, 6))
邮箱名 = 邮箱名 + 到文本 (字符 (95))
.判断 (计次 = 9)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 10)
邮箱名 = 邮箱名 + 到文本 (字符 (取随机数 (97, 122)))
.默认
.判断结束
.计次循环尾 ()
编辑框_邮箱名.内容 = 邮箱名
.计次循环首 (取随机数 (9, 16), 计次)
.判断开始 (计次 = 1)
密码 = 密码 + 到文本 (字符 (取随机数 (65, 90)))
.判断 (计次 = 2)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 3)
密码 = 密码 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 取随机数 (4, 6))
密码 = 密码 + 到文本 (字符 (取随机数 (58, 64)))
.判断 (计次 = 4)
密码 = 密码 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 5)
密码 = 密码 + 到文本 (字符 (取随机数 (48, 57)))
.判断 (计次 = 6)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 7)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 8)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 取随机数 (6, 10))
密码 = 密码 + 到文本 (字符 (取随机数 (58, 64)))
.判断 (计次 = 9)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 10)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 11)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 12)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 13)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 14)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 15)
密码 = 密码 + 到文本 (字符 (取随机数 (97, 122)))
.判断 (计次 = 取随机数 (10, 16))
密码 = 密码 + 到文本 (字符 (取随机数 (58, 64)))
.默认
.判断结束
.计次循环尾 ()
编辑框_密码.内容 = 密码
计次 = 1
.计次循环首 (取文本长度 (编辑框_邮箱名.内容), 计次)
调试输出 (计次)
邮箱名字母 [计次] = 取文本中间 (编辑框_邮箱名.内容, 计次, 1)
.计次循环尾 ()
.计次循环首 (取文本长度 (编辑框_邮箱名.内容), 计次)
密码字母 [计次] = 取文本中间 (编辑框_邮箱名.内容, 计次, 1)
.计次循环尾 ()
说调试输出后面那里错了。数组成员下标超定义范围了
|
最佳答案
查看完整内容
你的那两个数组没有成员,当然数组成员下标超定义范围了。
求助知识:请将问题描述清楚,最好把你有问题的源码打包上传上来,这样更方便大家帮助你。 友情提醒:本版被采纳的主题可在 申请荣誉值 帖子申请荣誉值,获得 3点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
|