发新话题
打印

新手求教请大家帮忙

Dim MyValue
Randomize   ' 对随机数生成器做初始化的动作。

MyValue = Int((6 * Rnd) + 1)   ' 生成 1 到 6 之间的随机数值。

TOP

发新话题