Question

6+1彩票随机产生号码VB代码

Answer 1

Text1 = Int((33 * Rnd) + 1)
Text2 = Int((33 * Rnd) + 1)
Text3 = Int((33 * Rnd) + 1)
Text4 = Int((33 * Rnd) + 1)
Text5 = Int((33 * Rnd) + 1)
Text6 = Int((33 * Rnd) + 1)

Text7 = Int((16 * Rnd) + 1)
我买彩票写给自己的
未对重复的数据做判断

Answer 2

就是产生7个0——9的随机数啥，用到函数rnd的哈，其他没有什么的了

Answer 3

因该要用到随机数吧！