在Visual Basic（VB）中生成随机数，可以使用以下方法：
使用`Rnd`函数
`Rnd`函数返回一个大于等于0且小于1的随机浮点数。
若要生成一个指定范围内的随机整数，可以将随机数乘以范围的大小，然后取整。例如，生成1到100之间的随机整数可以使用以下代码：
```vb
Dim MyValue As Integer
MyValue = Int（（100 * Rnd） + 1）
```
使用`Random`类（VB.NET）
如果你使用的是VB.NET，可以使用`System.Random`类来生成随机数。例如，生成1到100之间的随机整数可以使用以下代码：
```vb.net
Dim rnd As New Random（）
Dim MyValue As Integer = rnd.Next（1, 101）
```
使用`randbetween`函数（Excel VBA）
在Excel VBA中，可以使用`randbetween`函数生成指定范围内的随机整数。例如，在B2到B100生成从3到100之间的随机数可以使用以下代码：
```vb
Sub test1（）
Dim ss As Range
For Each ss In Range（"B2:B100"）
ss.Value = Int（（100 - 3 + 1） * Rnd + 3）
Next ss
End Sub
```
建议
选择合适的随机数生成方法：根据你的需求和使用的编程环境（VB或VB.NET），选择合适的随机数生成方法。
初始化随机数生成器：在使用`Rnd`函数之前，通常需要调用`Randomize`函数来初始化随机数生成器，以确保每次运行程序时生成的随机数序列是不同的。
注意随机数范围：在生成随机数时，确保指定的范围是有效的，并且考虑到随机数的上限和下限。
