請問各位高手
如何指定數值作亂數運算且不重複
如 A(1) = 1
A(2) = 12
A(3) = 3
A(4) = 14
A(5) = 5
A(6) = 16
A(7) = 7
A(8) = 18
重指定數值中取出
每次取 3 個為一組
1,12,3
1,12,14
1,12,5
每組取不同
參考的是每此取出不同
但若是多組亂數???
For I = 1 To 8
X = Int(Rnd * 8) + 1
Y = Int(Rnd * 8) + 1
Z = A(X)
A(X) = A(Y)
A(Y) = Z
Next
不之各位前輩是否有較好的方法
謝謝
如何指定數值作亂數運算且不重複
如 A(1) = 1
A(2) = 12
A(3) = 3
A(4) = 14
A(5) = 5
A(6) = 16
A(7) = 7
A(8) = 18
重指定數值中取出
每次取 3 個為一組
1,12,3
1,12,14
1,12,5
每組取不同
參考的是每此取出不同
但若是多組亂數???
For I = 1 To 8
X = Int(Rnd * 8) + 1
Y = Int(Rnd * 8) + 1
Z = A(X)
A(X) = A(Y)
A(Y) = Z
Next
不之各位前輩是否有較好的方法
謝謝
全站熱搜
留言列表