问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

易语言 怎么 随机抽取自定义的名字? 麻烦发一个源码。谢谢!

发布网友 发布时间:2022-05-03 09:05

我来回答

1个回答

热心网友 时间:2023-10-18 03:59

.程序集 窗口程序集1
.程序集变量 名字组, 文本型, , "0"

.子程序 __启动窗口_创建完毕

名字组 = { “赵1”, “赵2”, “赵3”, “赵4”, “赵5”, “赵6”, “赵7”, “赵8” }
置随机数种子 ()
编辑框1.标记 = “1”
编辑框2.标记 = “2”
编辑框3.标记 = “3”
编辑框4.标记 = “4”
编辑框5.标记 = “5”
编辑框6.标记 = “6”
编辑框7.标记 = “7”
编辑框8.标记 = “8”

.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 临时数组, 文本型, , "0"
.局部变量 y, 整数型
.局部变量 x, 整数型
.局部变量 编辑框变量, 编辑框

临时数组 = 名字组
.判断循环首 (取数组成员数 (临时数组) > 0)
x = 取随机数 (1, 取数组成员数 (临时数组))
文本 = 文本 + “[” + 临时数组 [x] + “]”
编辑框变量 = 取标记组件 (取数组成员数 (临时数组))
编辑框变量.内容 = 临时数组 [x]
清除数组 (临时数组)
.计次循环首 (取数组成员数 (名字组), y)
.如果真 (寻找文本 (文本, “[” + 名字组 [y] + “]”, 0, 假) < 0)
加入成员 (临时数组, 名字组 [y])

.如果真结束
调试输出 (名字组 [y])
.计次循环尾 ()
.判断循环尾 ()

热心网友 时间:2023-10-18 03:59

.程序集 窗口程序集1
.程序集变量 名字组, 文本型, , "0"

.子程序 __启动窗口_创建完毕

名字组 = { “赵1”, “赵2”, “赵3”, “赵4”, “赵5”, “赵6”, “赵7”, “赵8” }
置随机数种子 ()
编辑框1.标记 = “1”
编辑框2.标记 = “2”
编辑框3.标记 = “3”
编辑框4.标记 = “4”
编辑框5.标记 = “5”
编辑框6.标记 = “6”
编辑框7.标记 = “7”
编辑框8.标记 = “8”

.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 临时数组, 文本型, , "0"
.局部变量 y, 整数型
.局部变量 x, 整数型
.局部变量 编辑框变量, 编辑框

临时数组 = 名字组
.判断循环首 (取数组成员数 (临时数组) > 0)
x = 取随机数 (1, 取数组成员数 (临时数组))
文本 = 文本 + “[” + 临时数组 [x] + “]”
编辑框变量 = 取标记组件 (取数组成员数 (临时数组))
编辑框变量.内容 = 临时数组 [x]
清除数组 (临时数组)
.计次循环首 (取数组成员数 (名字组), y)
.如果真 (寻找文本 (文本, “[” + 名字组 [y] + “]”, 0, 假) < 0)
加入成员 (临时数组, 名字组 [y])

.如果真结束
调试输出 (名字组 [y])
.计次循环尾 ()
.判断循环尾 ()

热心网友 时间:2023-10-18 03:59

.程序集 窗口程序集1
.程序集变量 名字组, 文本型, , "0"

.子程序 __启动窗口_创建完毕

名字组 = { “赵1”, “赵2”, “赵3”, “赵4”, “赵5”, “赵6”, “赵7”, “赵8” }
置随机数种子 ()
编辑框1.标记 = “1”
编辑框2.标记 = “2”
编辑框3.标记 = “3”
编辑框4.标记 = “4”
编辑框5.标记 = “5”
编辑框6.标记 = “6”
编辑框7.标记 = “7”
编辑框8.标记 = “8”

.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 临时数组, 文本型, , "0"
.局部变量 y, 整数型
.局部变量 x, 整数型
.局部变量 编辑框变量, 编辑框

临时数组 = 名字组
.判断循环首 (取数组成员数 (临时数组) > 0)
x = 取随机数 (1, 取数组成员数 (临时数组))
文本 = 文本 + “[” + 临时数组 [x] + “]”
编辑框变量 = 取标记组件 (取数组成员数 (临时数组))
编辑框变量.内容 = 临时数组 [x]
清除数组 (临时数组)
.计次循环首 (取数组成员数 (名字组), y)
.如果真 (寻找文本 (文本, “[” + 名字组 [y] + “]”, 0, 假) < 0)
加入成员 (临时数组, 名字组 [y])

.如果真结束
调试输出 (名字组 [y])
.计次循环尾 ()
.判断循环尾 ()
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
企业培训学到了什么 培训感悟简短 有关培训的感悟 通过培训学到什么 培训你学到了什么 领导问培训学到什么怎么回复 Linux系统安装FTP服务器 Linux系统的网络文件共享 建筑的七盏明灯的内容简介 面向对象设计七大原则 简单说 交互设计七大定律 chrome应用和扩展程序的区别是什么? 求易语言随机生成昵称的写法 Chrome 流行扩展有哪些 Google Chrome扩展和插件的区别 谷歌浏览器进步了扩展程序库 怎么解决? bjango定义models可以不去同步数据库表,把它当做像java类那样使用吗 如何在PDF阅读器中直接添加WORD文档,并添加目录? 怎么样将pdf文件转化为word 怎么样把PDF转化WORD pdf文件有目录,怎么将其导出存入word? 易方达排名前三的基金 摩羯座的女生分手后,会不会想尽办法把对方重新追回来? 谁有microsoft office2003安装包啊啊啊 急需呢!!! 最近想入坑唯品会,唯品会的护肤品可靠不? 你好,我的电脑是WPS格式的,可因工作需要,需word2003格式,您能发给我一个安装包吗?不胜感激 唯品会的护肤品是正品吗?新买了一个多芬磨砂膏还不错 为啥我家电脑没有360加速球 桌面上没有电脑加速球咋办 加速球不见了怎么办? 360安全优化加速球不见了怎么办 易语言随机中文名如何实现? 易语言写随机重命名怎么写? 易语言求助,易语言取随机汉字(姓名)怎么写 易语言谁帮我制作一个随机抽选名字或数字的源码 我刚买的棉衣。洗了一下,一格里的棉全聚一块了。怎么办。 易语言随机生成随机名字和手机和车牌不重复出现 易语言 起名字,读取文本内文字,然后随机组合,将全部组合的名字保存到文本 水磨糯米粉可以做什么 棉袄底摆一半棉一半单怎么做不打绺 东山岛战役是什么时候发起的? 易语言怎么取QQ昵称。代码怎么写? 易语言怎么写可以实现随机产生窗口类名和窗口名 求易语言抽奖源码,随机抽取的是姓名,姓名是我自己写的, 易语言随机抽取指定的字 易语言登入帐号密码能不能提取qq网名? 蓝盔国防训练基地是干啥的 易语言如何从一段文本中随机提取6个字呢 易语言怎么取随机数1-100 2020年最火爆的军事拓展训练基地在哪里? 易语言如何弄取游戏名字我上两个它取一个号的名字