论坛 › 『 提问交流 』 › 随机抽取问题

xymc 发表于 2017-3-26 22:24:47

随机抽取问题

本帖最后由 xymc 于 2017-3-26 22:39 编辑

Local $a1 = xxx
Local $a2 = xxx
Local $a3 = xxx
Local $a4 = xxx
Local $a5 = xxx
Local $a6 = xxx

如何随机抽取一个值

229989799 发表于 2017-3-26 22:38:56

如果随机抽取一个值
然后呢？？

Alam 发表于 2017-3-27 00:04:39

用数组吧, 随机获取下标数就好.

heroxianf 发表于 2017-3-27 13:38:55

回复 1# xymc

最近用到了，分享给你！

    Local $array
$array = 1
$array = 2
$array = 3
$array = 4
$array = 5
$array = 6
$array = 7
$array = 8
$array = 9
$array = 10

For $i = 1 To 30
        Local $No = Random(0, UBound($array) - 1, 1)
        MsgBox(0, "", $array[$No], 1)
Next

fenhanxue 发表于 2017-3-30 02:43:07

local $array =

$r = random(0,5,1)

随机抽取结果：$array[$r]

wuliaonaonao 发表于 2017-3-31 12:43:41

谢谢分享学习

jingzhinvr 发表于 2017-3-31 23:54:33

这个有意思啊

zmdzhxj 发表于 2017-4-6 16:00:41

学习了，有用

查看完整版本: 随机抽取问题