jieelin 发表于 2009-4-11 16:36:26

请教高手一个随机产生顺序该怎么写

遇到一个问题,我现在有5个数字,顺序排列,,比如说1,2,3,4,5, 我想随机的产生一个顺序,比如说,,5,3,2,4,1,或者2,3,1,4,5 这个顺序是用程序随机产生的.这样的程序该怎么写? 求高手指点,谢谢!!!!!

[ 本帖最后由 jieelin 于 2009-4-11 21:50 编辑 ]

大绯狼 发表于 2009-4-11 17:06:19

用字符控制加Random

sxd 发表于 2009-4-11 17:31:24

就是随机数不重复咯 论坛有例子 搜索

jieelin 发表于 2009-4-11 21:50:09

在论坛里搜索了一下并稍微修改了一下,改成自己想要的.. 代码如下:
#include "array.au3"

$n = 5;要取的总个数
$Bx = "";显示用
Dim $A   ;存放5个数
For $i = 0 To 4   ;放数进去
        $A[$i] = $i + 1
Next
For $i = 1 To $n
        $y = Random(1, UBound($A)-1, 1)
        $Bx &=$A[$y]
        _ArrayDelete($A, $y)
Next
MsgBox(0, "", $Bx)
页: [1]
查看完整版本: 请教高手一个随机产生顺序该怎么写