VB 随机数摇号

来源:百度知道 编辑:UC知道 时间:2024/06/28 09:24:17
我想用VB编写一个摇号程序,用鼠标控制开始、暂停。可以随机产生1——100中的数,但是不能重复。还需要在产生数后播放一段音乐。谢了!

Dim a
a=Int((100 * Rnd) + 1)

Rnd 产生随机数
a 是把产生的随机数放在那
Int 取整数部分
100 最大是多少(从0开始)
+1 使他从1开始

如果不能重复,还要一个数组把已经产生过的数存起来,再产生随机数的时候要先与数组进行比较,如果数组中已经有了,要重新产生随机数

可以用X=FIX(RND*100)LAI 产生随机数