在VB中，可以使用Randomize函数来生成随机数。
Randomize函数用于初始化Rnd函数的随机数种子。在调用Randomize函数之后，每次调用Rnd函数都会生成不同的随机数序列。
示例代码如下：
Dim randomNum As Double
Randomize ' 初始化随机数种子
randomNum = Rnd() ' 生成一个随机数
在上面的代码中，首先调用Randomize函数来初始化随机数种子，然后通过调用Rnd函数生成一个随机数。每次运行该代码，生成的随机数都会不同。
你还可以使用Rnd函数的参数来指定随机数的上下限。例如，如果你想生成一个介于0和10之间的随机数，可以使用以下代码：
Dim randomNum As Integer
Randomize
randomNum = Int((10 * Rnd) + 1) ' 生成一个介于1和10之间的随机整数
在上面的代码中，Rnd函数生成的随机数乘以10后再加1，得到一个介于1和10之间的随机浮点数。然后使用Int函数将其转换为整数。所以最终生成的随机数为一个介于1和10之间的整数。
