开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 1095|回复: 8
收起左侧

[易语言] 取随机数

[复制链接]
结帖率:88% (69/78)
发表于 2017-8-18 12:15:27 | 显示全部楼层 |阅读模式   广东省惠州市
5精币
编辑框1.内容
取随机数
2,4,6,8,10,12
要求随机这6个数
这个改怎么弄求源码


回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:100% (3/3)

签到天数: 10 天

发表于 2017-8-18 12:18:29 | 显示全部楼层   广东省佛山市

  1. .版本 2
  2. .支持库 spec

  3. .局部变量 a, 整数型, , "6"

  4. 置随机数种子 (取启动时间 ())
  5. a = { 2, 4, 6, 8, 10, 12 }
  6. 调试输出 (a [取随机数 (1, 取数组成员数 (a))])

复制代码
回复

使用道具 举报

结帖率:100% (3/3)

签到天数: 28 天

发表于 2017-8-18 12:20:42 | 显示全部楼层   江苏省苏州市
  
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
str文本型 
内容文本型0
a整数型 
str = “2,4,6,8,10,12”
内容 = 分割文本 (str, “,”, )
置随机数种子 ()
判断循环首 (取数组成员数 (内容) ≥ 1)
a = 取随机数 (1, 取数组成员数 (内容))
删除成员 (内容, a, 1)
判断循环尾 ()
回复

使用道具 举报

结帖率:100% (4/4)
发表于 2017-8-18 12:26:21 | 显示全部楼层   贵州省贵阳市
置随机种子()
编辑框1.内容=到文本(取随机数(1,6)*2)
回复

使用道具 举报

结帖率:75% (3/4)

签到天数: 28 天

发表于 2017-8-18 12:32:32 | 显示全部楼层   湖南省永州市
置随机数种子()
取随机数(1,6)*2

点评

没赋值、   湖南省邵阳市  发表于 2017-8-18 14:07
回复

使用道具 举报

结帖率:90% (19/21)
发表于 2017-8-18 13:54:46 | 显示全部楼层   广西壮族自治区柳州市
楼主,我已经帮你弄好了,这是代码  如果你想更换内容 直接把str的值进行替换就行 这个是万能的

.版本 2
.支持库 spec

.局部变量 数组, 文本型, , "0"
.局部变量 第几个数, 整数型
.局部变量 str, 文本型

' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
str = “2, 4, 6, 8, 10, 12 ”
数组 = 分割文本 (str, “,”, )
置随机数种子 ()
第几个数 = 取随机数 (1, 取数组成员数 (数组))
调试输出 (数组 [第几个数])
回复

使用道具 举报

结帖率:100% (10/10)
发表于 2017-8-18 14:06:34 | 显示全部楼层   湖南省邵阳市
冯古屋 发表于 2017-8-18 12:20
[e=0].版本 2

.子程序 _按钮1_被单击
  1. .版本 2
  2. .支持库 spec

  3. 置随机数种子 ()
  4. 调试输出 (多项选择 (取随机数 (1, 6), 2, 4, 6, 8, 10, 12))

复制代码

前辈,这样就行了。
回复

使用道具 举报

结帖率:100% (3/3)

签到天数: 28 天

发表于 2017-8-18 14:14:25 | 显示全部楼层   江苏省苏州市
晓时候 发表于 2017-8-18 14:06
前辈,这样就行了。

是呀,还是你简单
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表