Question

易语言中怎么设置随机数

在易语言中，我要设置一个随机在标签中抽取1-47（除了10，12，46）的数，一次抽出一个，按钮是先点一下就开始抽，按钮名从“开始”变到“停止”再点一下就随机停止一个数，怎么做？？急啊。。。
小弟易语言刚学，什么都不懂，望大虾指点下。。。悬赏不是问题

Answer 1

.版本 2

.程序集 窗口程序集1

.程序集变量 A, 整数型

.子程序 _按钮1_被单击

A ＝ 取随机数 (1, 47)

.如果 (寻找文本 (到文本 (A), “10”, , 假) ＝ -1)

    .如果 (寻找文本 (到文本 (A), “12”, , 假) ＝ -1)

        .如果 (寻找文本 (到文本 (A), “46”, , 假) ＝ -1)

            编辑框1.内容 ＝ 到文本 (A)

        .否则

            _按钮1_被单击 ()

        .如果结束

    .否则

        _按钮1_被单击 ()

    .如果结束

.否则

    _按钮1_被单击 ()

.如果结束

Answer 2

取随机数（1,47）
逗号左边为最小数值，右边你想输入的最大数值。

Answer 3

首先 置随机种子（）
我用到的组件有 时钟1 标签1 按钮1
下面是我的源码：
.版本 2

.程序集 窗口程序集1
.程序集变量 随机数, 整数型

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

置随机数种子 ()

.子程序 _时钟1_周期事件

.循环判断首 ()
随机数 ＝ 取随机数 (1, 47)
.循环判断尾 (随机数 ＝ 10 且 随机数 ＝ 12 且 随机数 ＝ 46)
标签1.标题 ＝ 到文本 (随机数)

.子程序 _按钮1_被单击

.如果 (按钮1.标题 ＝ “开始”)
按钮1.标题 ＝ “停止”
时钟1.时钟周期 ＝ 100
.否则
按钮1.标题 ＝ “开始”
时钟1.时钟周期 ＝ 0
.如果结束

追问

错误(30): 找不到指定的变量名称“随机数”。

追答

你没有把我的代码复制完全吧
程序集 窗口程序集1
.程序集变量 随机数, 整数型
这个就是申明了一个程序集变量 你的问题就是没有申明这个变量

追问

但是我加了之后有时还是显示了10 12和46，怎样才能除掉这三个数字？

追答

哦 抱歉
循环判断尾 (随机数 ＝ 10 且 随机数 ＝ 12 且 随机数 ＝ 46)
上面这段代码逻辑写错了 三个且都改成 或 就行了 呵呵 粗心了……

Answer 4

2011-11-18 23:20 热心网友 的回答是可行的、用到一个“标签”一个“按钮” 代码是：
.版本 2

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

按钮1.标题 ＝ “开始”

.子程序 _按钮1_被单击

.如果 (按钮1.标题 ＝ “开始”)
置随机数种子 ()
按钮1.标题 ＝ “停止”
时钟1.时钟周期 ＝ 50
.否则
按钮1.标题 ＝ “开始”
时钟1.时钟周期 ＝ 0
.如果结束

.子程序 _时钟1_周期事件
.局部变量 临时数字, 短整数型

.循环判断首 ()
临时数字 ＝ 取随机数 (1, 47)
.循环判断尾 (临时数字 ＝ 10 或 临时数字 ＝ 12 或 临时数字 ＝ 46)
标签1.标题 ＝ 到文本 (临时数字)

Answer 5

后面+一段

置随机数种子 ()