全民一起VBA提高篇 第二十回 随机数变幻莫测，模运算买椟还珠

 

相关知识点

默认属性，range（3，2）默认属性是value，对象赋值要用set

Mod模运算:求余数，可以用于奇偶数判断或者周期性问题

Rnd(): 随机数，返回0-1（包含0，不含1）之间的Double类型随机小数。可选参数为随机序列的生成方式。Int(Rnd()*n),n模运算的值得到0-（n-1）之间的随机数

随机数万能公式：生成[a,b]之间的随机数Int(Rnd()*(b-a+1)+a),包含a和b

伪随机数：过程似乎是随机的，实际上是需要开始值（种子），种子不变生成的随机数也不变。

Randomize:随机数初始化，按照当前的系统的时间作为种子

例1 交替染色

Sub colorize()

     Dim m