求一个用易语言写的抽奖软件(源码)。
我想自己用易语言做一个抽奖软件,就像电视上看到的那种,是一串滚动的随机数字,或许说是跳动的数字吧。求高人给点类似的易语言代码参考。邮箱:1478339638@qq.com...
我想自己用易语言做一个抽奖软件,就像电视上看到的那种,是一串滚动的随机数字,或许说是跳动的数字吧。求高人给点类似的易语言代码参考。
邮箱:1478339638@qq.com
或直接QQ:1478339638 展开
邮箱:1478339638@qq.com
或直接QQ:1478339638 展开
3个回答
展开全部
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 a, 整数型, , "0"
.局部变量 计次变量, 整数型
.局部变量 b, 整数型
编辑框1.内容 = “”
.计次循环首 (35, 计次变量)
加入成员 (a, 计次变量)
.计次循环尾 ()
.计次循环首 (7, )
b = 取随机数 (1, 取数组成员数 (a))
编辑框1.内容 = 编辑框1.内容 + 到文本 (a [b]) + “ ”
删除成员 (a, b, 1)
.计次循环尾 ()
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 a, 整数型, , "0"
.局部变量 计次变量, 整数型
.局部变量 b, 整数型
编辑框1.内容 = “”
.计次循环首 (35, 计次变量)
加入成员 (a, 计次变量)
.计次循环尾 ()
.计次循环首 (7, )
b = 取随机数 (1, 取数组成员数 (a))
编辑框1.内容 = 编辑框1.内容 + 到文本 (a [b]) + “ ”
删除成员 (a, b, 1)
.计次循环尾 ()
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
添加一个按钮1和一个 透明标签1
若有不足处,可以补充问题或加我百度HI
.子程序 _按钮1_被单击
.局部变量 跳转次数, 整数型
跳转次数 = 0
.判断循环首 (_启动窗口.可视 = 真)
跳转次数 = 跳转次数 + 1
透明标签1.标题 = 到文本 (取随机数 (1, 100)) ' 取随机数的第一个参数除以第二个参数为中奖的几率
延迟 (1000 ÷ 跳转次数) ' 会想电视上一样开始抽奖的时候逐渐加快
.如果真 (跳转次数 = 1000) ' 这里决定一次抽奖要花费多少时间,跳转次数越大时间就越久
跳出循环 ()
.如果真结束
.判断循环尾 ()
信息框 (“本次” + 透明标签1.标题 + “为幸运数字!中奖几率为百分之一!”, 0, )
若有不足处,可以补充问题或加我百度HI
.子程序 _按钮1_被单击
.局部变量 跳转次数, 整数型
跳转次数 = 0
.判断循环首 (_启动窗口.可视 = 真)
跳转次数 = 跳转次数 + 1
透明标签1.标题 = 到文本 (取随机数 (1, 100)) ' 取随机数的第一个参数除以第二个参数为中奖的几率
延迟 (1000 ÷ 跳转次数) ' 会想电视上一样开始抽奖的时候逐渐加快
.如果真 (跳转次数 = 1000) ' 这里决定一次抽奖要花费多少时间,跳转次数越大时间就越久
跳出循环 ()
.如果真结束
.判断循环尾 ()
信息框 (“本次” + 透明标签1.标题 + “为幸运数字!中奖几率为百分之一!”, 0, )
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
发到你邮箱里了!
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询