Do Randomize随机数 = Int((9999 * rnd) + 1)If 随机数 > 1000 Then Exit Do End IfLoop TracePrint 随机数这样应该就是随机生成4位数了，是这个效果吗
能不能说的具体点？
