[筆記] ASP 亂數陣列

尾牙可能會用到…

簡單說就是XX排序，不過我忘記那個名詞了.. (bubble ? ) > dim myarray(60) > > for i = 1 to 60 > > myarray(i) = i > > Next > > for j = 1 to 59 > > randomize > > j1 = Int((60-1+1) * Rnd +1 ) > > k1 = Int((60-1-1)*Rnd+1) > > t1 = myarray(j1) > > myarray(j1) = myarray(k1) > > myarray(k1) = t1 > > Next