VBA,如何获得不重复随机数(实现不放回随机)的几种方法------ 未完成(还想补充一些字典的方法等)---1 普通随机,利用 rnd()2 如果要实现,不重复的随机数 / 或者叫 不放回随机数3 一些要注意的问题4 未完成部分
1 普通随机,利用rnd()很可能随机出重复的值,因为对应是 放回随机 的方法 缺省值 Randomize 等同于Randomize timer 用时间做了随机种子 rnd等同于 rnd(1) 或 rnd(正数)Sub cs1() s = 10 For i = 1 To s Call cs2 NextEnd SubSub cs2()Randomizep1 = Int(1 + 10 * Rnd)Debug.Print "p1= " & p...