當前位置:商標查詢大全網 - 彩票開獎 - 彩票代碼制作

彩票代碼制作

私有子命令1_Click()

維度I,a(34),b(7)

隨機化:Cls

對於i = 1到7

b(i) = Int(Rnd * 34 + 1)

如果a(b(i))那麽i = i - 1否則a(b(i)) = 1

然後

打印“34選7組福利彩票系統,中獎號碼為:”

對於i = 1到7

打印b(壹)

然後

末端接頭

請不要發違法廣告,這是違法的。