用易语言一个抽奖工具时,怎样让编辑框里面得到的数字不重复。
2个回答
2013-11-29
展开全部
.版本 2.程序集 窗口程序集1.子程序 _按钮1_被单击
.局部变量 i, 整数型置随机数种子 ()
i = 取随机数 (1111, 9999)
.如果真 (判断是否重复 (i) = 假)
编辑框1.加入文本 (到文本 (i) + #换行符)
.如果真结束 .子程序 判断是否重复, 逻辑型
.参数 参数, 整数型
.局部变量 临时, 文本型, , "0"
.局部变量 i, 整数型临时 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (临时), i)
.如果真 (临时 [i] = 到文本 (参数))
返回 (真)
.如果真结束.计次循环尾 ()
返回 (假)
.局部变量 i, 整数型置随机数种子 ()
i = 取随机数 (1111, 9999)
.如果真 (判断是否重复 (i) = 假)
编辑框1.加入文本 (到文本 (i) + #换行符)
.如果真结束 .子程序 判断是否重复, 逻辑型
.参数 参数, 整数型
.局部变量 临时, 文本型, , "0"
.局部变量 i, 整数型临时 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (临时), i)
.如果真 (临时 [i] = 到文本 (参数))
返回 (真)
.如果真结束.计次循环尾 ()
返回 (假)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-11-29
展开全部
把出现过的数字加入数组进行判断,相同的就不显示出来,
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询