在VB.NET中生成随机数字的代码是一种常见的编程需求。随机数字可以用于各种场景，例如生成验证码、模拟数据、游戏开发等。在本文中，我们将介绍一些常用的VB.NET代码来生成随机数字。

首先，我们可以使用VB.NET提供的Random类来生成随机数字。Random类是一个伪随机数生成器，它可以生成均匀分布的随机数。下面是一个生成随机整数的示例代码：

Dim random As New Random()
Dim randomNumber As Integer = random.Next()

上述代码中，我们首先创建了一个Random对象，并使用Next方法生成一个随机整数。如果不指定参数，Next方法将生成一个大于等于0且小于Int32.MaxValue的整数。

如果需要生成一个指定范围内的随机整数，我们可以使用Next方法的重载版本，该版本接受两个参数，分别是最小值和最大值。下面是一个生成1到100之间的随机整数的示例代码：

Dim random As New Random()
Dim randomNumber As Integer = random.Next(1, 101)

上述代码中，Next方法将生成一个大于等于1且小于101的整数。

除了生成随机整数，我们还可以使用Random类生成随机浮点数。Random类的NextDouble方法可以生成一个大于等于0且小于1的随机浮点数。下面是一个生成0到1之间的随机浮点数的示例代码：

Dim random As New Random()
Dim randomNumber As Double = random.NextDouble()

要生成一个指定范围内的随机浮点数，可以使用以下代码：

Dim random As New Random()
Dim min As Double = 1.0
Dim max As Double = 10.0
Dim randomNumber As Double = random.NextDouble() * (max - min) + min

上述代码中，我们首先定义了最小值和最大值，然后使用NextDouble方法生成一个大于等于0且小于1的随机浮点数，并将其乘以范围的长度，再加上最小值，从而得到指定范围内的随机浮点数。

除了使用Random类，我们还可以使用VB.NET提供的RNGCryptoServiceProvider类生成更安全的随机数字。RNGCryptoServiceProvider类使用加密学安全随机数生成器生成随机数字。下面是一个使用RNGCryptoServiceProvider类生成随机整数的示例代码：

Dim provider As New RNGCryptoServiceProvider()
Dim byteArray(3) As Byte
provider.GetBytes(byteArray)
Dim randomNumber As Integer = BitConverter.ToInt32(byteArray, 0)

上述代码中，我们首先创建了一个RNGCryptoServiceProvider对象，然后使用GetBytes方法生成一个包含4个字节的随机字节数组。最后，我们使用BitConverter类的ToInt32方法将字节数组转换为整数。

总结来说，在VB.NET中生成随机数字可以使用Random类或RNGCryptoServiceProvider类。Random类适用于大多数非加密的随机数生成场景，而RNGCryptoServiceProvider类适用于需要更高安全性的场景。无论哪种方法，我们都可以根据需求生成指定范围的随机整数或浮点数。希望本文对您了解如何在VB.NET中生成随机数字有所帮助。