在VB中，可以使用Rnd函数来生成一个随机数。具体方法如下：

首先，需要使用Randomize函数来初始化随机数发生器。可以使用Timer函数作为参数，以确保每次生成的随机数都是不同的。

然后，使用Rnd函数生成一个0到1之间的随机数。如果需要生成其他范围内的随机数，可以通过乘以一个数和加上一个数的方式来实现。

下面是一个简单的示例代码：

Randomize TimerDim randomNumber As IntegerrandomNumber = Int((100 * Rnd) + 1) '生成1到100之间的随机数MsgBox randomNumber

在上面的代码中，首先使用Randomize函数初始化随机数发生器，然后使用Rnd函数生成一个0到1之间的随机数并将其转换为整数，最后输出生成的随机数。