在编程中，使用 `Rnd` 函数生成随机数的方法如下：
生成0到1之间的随机小数
```vba
Dim 随机数 As Single
随机数 = Rnd
MsgBox 随机数
```
生成指定范围内的随机整数
生成1到10之间的随机整数：
```vba
Dim 随机数 As Integer
随机数 = Int（（10 * Rnd） + 1）
MsgBox 随机数
```
生成50到100之间的随机整数：
```vba
Dim 随机数 As Integer
随机数 = Int（（51 * Rnd） + 50）
MsgBox 随机数
```
生成指定范围内的随机小数
生成1.5到2.5之间的随机小数：
```vba
Dim 随机数 As Single
随机数 = Rnd * （2.5 - 1.5） + 1.5
MsgBox 随机数
```
注意事项：
`Rnd` 函数生成的是0到1之间的小数，不包含1。
若要生成指定范围的随机整数，可以使用公式 `（最大值 - 最小值 + 1） * Rnd + 最小值`。
若要生成指定范围的随机小数，可以使用公式 `Rnd * （最大值 - 最小值） + 最小值`。
可以使用 `Randomize` 语句设置随机数生成器的种子值，以控制随机数序列的重复性。如果不设置种子值，`Rnd` 函数将使用系统时钟作为默认种子值。
示例代码：
```vba
Sub 生成随机整数（）
' 生成1到10之间的随机整数
Dim 随机数 As Integer
随机数 = Int（（10 * Rnd） + 1）
MsgBox "随机整数： " & 随机数
End Sub
Sub 生成指定范围随机整数（）
' 生成50到100之间的随机整数
Dim 随机数 As Integer
随机数 = Int（（51 * Rnd） + 50）
MsgBox "随机整数： " & 随机数
End Sub
Sub 生成随机小数（）
' 生成0到1之间的随机小数
Dim 随机数 As Single
随机数 = Rnd
MsgBox "随机小数： " & 随机数
End Sub
Sub 生成指定范围随机小数（）
' 生成1.5到2.5之间的随机小数
Dim 随机数 As Single
随机数 = Rnd * （2.5 - 1.5） + 1.5
MsgBox "随机小数： " & 随机数
End Sub
```
通过这些代码示例，你可以轻松地在VBA中生成不同范围和类型的随机数。