易语言谁帮我制作一个随机抽选名字或数字的源码
发布网友
发布时间:2022-05-03 09:05
我来回答
共4个回答
热心网友
时间:2023-10-18 03:59
把姓名或数字 逐个放到一个一维数组中
然后置随机种子取随机数,然后根据这个随机数 将数组中的值 取出 放到你要显示的组件中(如编辑框)。
.版本 2
.程序集 窗口程序集1
.程序集变量 姓名数组, 文本型, , "0"
.程序集变量 点击数, 整数型
.子程序 _按钮1_被单击
.局部变量 随机数, 整数型
.局部变量 n, 整数型
' 循环加入不同姓名
.计次循环首 (10, n)
加入成员 (姓名数组, “张三” + 到文本 (n))
.计次循环尾 ()
' 置随机种子并 取出数组范围内的随机数
置随机数种子 (取秒 (取现行时间 ()) + 点击数)
随机数 = 取随机数 (1, 取数组成员数 (姓名数组))
' 将内容打印到编辑框中
编辑框1.内容 = 姓名数组 [随机数]
' 增加随机种子的随机性
点击数 = 点击数 + 1
补充
问:可以啊,但是为什么随机抽取的名字后面都加数字?
答:我是给你举个例子所以加入了后面带数字的名字
其实实际中 这些名字一般是由操作者加入的 ,不是程序设计时添加的。
热心网友
时间:2023-10-18 03:59
.版本 2
.程序集 窗口程序集1
.程序集变量 数据库, 文本型
.程序集变量 数据库数据组, 文本型, , "0"
.子程序 __启动窗口_创建完毕
数据库 = “小明|小王|傻蛋|大傻|小傻|张三|李四|王二麻子|马五”
数据库数据组 = 分割文本 (数据库, “|”, )
置随机数种子 (到整数 (取时间部分 (取现行时间 (), 8))) ' 随机种子你可以设置复杂点,比如年+月+日+时+分+秒 就不会有重复了
.子程序 _按钮1_被单击
信息框 (“恭喜:” + 数据库数据组 [取随机数 (1, 取数组成员数 (数据库数据组))], 0, )
热心网友
时间:2023-10-18 04:00
取数字就是取随机数,取名字你得用到数据库操作,下面是取数字的(一个标签,一个时钟,两个按钮),另一个取姓名的(一个标签,一个时钟,一个数据源,一个数据库提供者,两个按钮)
=======================取数字=======================
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
按钮1.标题 = “开始”
按钮2.标题 = “停止”
按钮1.禁止 = 假
按钮2.禁止 = 假
时钟1.时钟周期 = 0
.子程序 _时钟1_周期事件
.局部变量 i, 整数型
i = 取随机数 (1, 100)
标签1.标题 = 到文本 (i)
.子程序 _按钮1_被单击
时钟1.时钟周期 = 10
按钮1.禁止 = 真
按钮2.禁止 = 假
.子程序 _按钮2_被单击
时钟1.时钟周期 = 0
按钮2.禁止 = 真
按钮1.禁止 = 假
====================================================
=======================取姓名=======================
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
按钮1.标题 = “开始”
按钮2.标题 = “停止”
按钮1.禁止 = 假
按钮2.禁止 = 假
时钟1.时钟周期 = 0
数据库提供者1.数据库文件名 = “C:\Documents and Settings\Administrator\桌面\姓名.edb” ' 这里修改你自己的数据库路径
数据源1.数据提供者 = “数据库提供者1”
.子程序 _时钟1_周期事件
.局部变量 i, 整数型
i = 取随机数 (1, 数据源1.取行数 ())
标签1.标题 = 数据源1.取文本 (i, 1)
.子程序 _按钮1_被单击
时钟1.时钟周期 = 10
按钮1.禁止 = 真
按钮2.禁止 = 假
.子程序 _按钮2_被单击
时钟1.时钟周期 = 0
按钮2.禁止 = 真
按钮1.禁止 = 假
====================================================
热心网友
时间:2023-10-18 04:01
在易语言的官方网站看看资料不是更好
热心网友
时间:2023-10-18 03:59
把姓名或数字 逐个放到一个一维数组中
然后置随机种子取随机数,然后根据这个随机数 将数组中的值 取出 放到你要显示的组件中(如编辑框)。
.版本 2
.程序集 窗口程序集1
.程序集变量 姓名数组, 文本型, , "0"
.程序集变量 点击数, 整数型
.子程序 _按钮1_被单击
.局部变量 随机数, 整数型
.局部变量 n, 整数型
' 循环加入不同姓名
.计次循环首 (10, n)
加入成员 (姓名数组, “张三” + 到文本 (n))
.计次循环尾 ()
' 置随机种子并 取出数组范围内的随机数
置随机数种子 (取秒 (取现行时间 ()) + 点击数)
随机数 = 取随机数 (1, 取数组成员数 (姓名数组))
' 将内容打印到编辑框中
编辑框1.内容 = 姓名数组 [随机数]
' 增加随机种子的随机性
点击数 = 点击数 + 1
补充
问:可以啊,但是为什么随机抽取的名字后面都加数字?
答:我是给你举个例子所以加入了后面带数字的名字
其实实际中 这些名字一般是由操作者加入的 ,不是程序设计时添加的。
热心网友
时间:2023-10-18 04:00
.版本 2
.程序集 窗口程序集1
.程序集变量 数据库, 文本型
.程序集变量 数据库数据组, 文本型, , "0"
.子程序 __启动窗口_创建完毕
数据库 = “小明|小王|傻蛋|大傻|小傻|张三|李四|王二麻子|马五”
数据库数据组 = 分割文本 (数据库, “|”, )
置随机数种子 (到整数 (取时间部分 (取现行时间 (), 8))) ' 随机种子你可以设置复杂点,比如年+月+日+时+分+秒 就不会有重复了
.子程序 _按钮1_被单击
信息框 (“恭喜:” + 数据库数据组 [取随机数 (1, 取数组成员数 (数据库数据组))], 0, )
热心网友
时间:2023-10-18 04:00
取数字就是取随机数,取名字你得用到数据库操作,下面是取数字的(一个标签,一个时钟,两个按钮),另一个取姓名的(一个标签,一个时钟,一个数据源,一个数据库提供者,两个按钮)
=======================取数字=======================
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
按钮1.标题 = “开始”
按钮2.标题 = “停止”
按钮1.禁止 = 假
按钮2.禁止 = 假
时钟1.时钟周期 = 0
.子程序 _时钟1_周期事件
.局部变量 i, 整数型
i = 取随机数 (1, 100)
标签1.标题 = 到文本 (i)
.子程序 _按钮1_被单击
时钟1.时钟周期 = 10
按钮1.禁止 = 真
按钮2.禁止 = 假
.子程序 _按钮2_被单击
时钟1.时钟周期 = 0
按钮2.禁止 = 真
按钮1.禁止 = 假
====================================================
=======================取姓名=======================
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
按钮1.标题 = “开始”
按钮2.标题 = “停止”
按钮1.禁止 = 假
按钮2.禁止 = 假
时钟1.时钟周期 = 0
数据库提供者1.数据库文件名 = “C:\Documents and Settings\Administrator\桌面\姓名.edb” ' 这里修改你自己的数据库路径
数据源1.数据提供者 = “数据库提供者1”
.子程序 _时钟1_周期事件
.局部变量 i, 整数型
i = 取随机数 (1, 数据源1.取行数 ())
标签1.标题 = 数据源1.取文本 (i, 1)
.子程序 _按钮1_被单击
时钟1.时钟周期 = 10
按钮1.禁止 = 真
按钮2.禁止 = 假
.子程序 _按钮2_被单击
时钟1.时钟周期 = 0
按钮2.禁止 = 真
按钮1.禁止 = 假
====================================================
热心网友
时间:2023-10-18 04:01
在易语言的官方网站看看资料不是更好