在Visual Basic（VB）中生成随机数，可以使用以下方法：
使用Rnd函数
`Rnd`函数可以生成0到1之间的随机数。
若要生成指定范围内的随机数，可以将随机数乘以范围的上限，然后加上下限，最后取整。
示例代码：
```vb
Dim num As Integer
num = Int（Rnd（） * 100） + 1 ' 生成1到100之间的随机整数
```
使用Randomize语句
`Randomize`语句用于初始化随机数生成器，如果不使用，每次生成的随机数都是一样的。
示例代码：
```vb
Randomize
Dim num As Integer
num = Int（Rnd（） * 100） + 1 ' 生成1到100之间的随机整数
```
生成随机字符串
可以使用循环和字符数组来生成指定长度的随机字符串。
示例代码：
```vb
Function RandomString（length As Integer） As String
Dim i As Integer
Dim str As String
Dim chars As String
chars = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
For i = 1 To length
str = str & chars（Int（Rnd（） * chars.Length））
Next i
RandomString = str
End Function
```
使用Random类（VB.NET）
如果使用的是VB.NET，可以使用`System.Random`类来生成随机数。
示例代码：
```vb
Dim random As New Random（）
Dim randomNumber As Integer = random.Next（1, 101） ' 生成1到100之间的随机数
Console.WriteLine（randomNumber）
```
建议
初始化随机数生成器：在使用`Rnd`函数之前，建议调用`Randomize`语句来初始化随机数生成器，以确保每次运行程序时生成的随机数序列不同。
生成指定范围的随机数：通过将随机数乘以范围的上限并加上下限，然后取整，可以轻松生成指定范围内的随机数。
生成不重复的随机数：如果需要生成不重复的随机数，可以使用`System.Random`类的`Next`方法，并结合集合来检查生成的随机数是否已存在。
这些方法可以帮助你在VB中有效地生成随机数。