其中，`number`为可选参数，若为正数，Rnd生成下一个随机数；若为0，返回最近生成的随机数；若为负数，使用该数作为种子生成新序列。默认情况下，Rnd返回一个大于等于0且小于1的单精度随机数如0.123、0.987等。
示例代码： ```vb Dim r As Single r = Rnd ' 生成0~1之间的随机数，如0.4567 ```
二、Randomize语句：决伪随机数重复问题 Rnd函数生成的是“伪随机数”，即若不初始化，每次程序运行时生成的随机数序列相同。Randomize语句的作用是初始化随机数生成器，避免重复序列，其语法格式为： `Randomize [seed]``seed`为可选参数，若省略，VB将以系统当前时间作为种子；若指定数值，该数值将作为种子相同种子生成相同序列。
示例代码： ```vb Randomize ' 以系统时间为种子初始化 Dim r As Single r = Rnd ' 生成随机数，每次运行结果不同 ```
三、生成指定范围的随机整数 实际开发中，常需生成特定区间的整数如1~10、50~100等。核心公式为：Int((b - a + 1) * Rnd + a)，其中`a`为区间最小值，`b`为区间最大值。示例：生成1.00~5.00的两位小数随机数 ```vb Randomize Dim decNum As String decNum = Format((5 - 1) * Rnd + 1, "0.00") ' 结果如2.34、4.56等 ```
五、意事项 1. 避免重复初始化 避免在循环内重复调用Randomize，否则可能因种子更新过快导致随机性降低。例如： ```vb ' 错误用法：循环内重复Randomize，随机性差 For i = 1 To 10 Randomize Print Rnd Next' 正确用法：循环外初始化一次 Randomize For i = 1 To 10 Print Rnd Next ```
2. 种子与序列控制 若需复现特定随机序列，可指定`Randomize`的`seed`参数。例如： ```vb Randomize 123 ' 固定种子123 Print Rnd ' 结果恒为0.7055475每次运行相同 ```
VB随机数生成通过Rnd函数与Randomize语句的配合，可灵活实现不同范围、不同精度的随机数需求。掌握核心公式与意事项，能有效提升随机数生成的准确性与效率，满足各类开发场景的需求。