代码之家  ›  专栏  ›  技术社区  ›  Bogaso

rnd()函数在VBA中的使用

  •  1
  • Bogaso  · 技术社区  · 1 年前

    我有一个自定义的函数,如下所示

    Function abc(Seed As Long)
    Static iset As Integer
    Static gset As Double
    MsgBox Rnd(Seed)
    MsgBox Rnd(Seed)
    abc = 0
    End Function
    

    然而,我得到了两个不同的值 Rnd(Seed) 来自 MsgBox 。然而,由于我固定了种子,我希望得到相同的值。

    你能帮我了解一下种子是如何工作的吗 rnd()

    1 回复  |  直到 1 年前
        1
  •  3
  •   Black cat    1 年前

    这来自Excel VBA帮助

    Returns a Single containing a random number.
    
    Syntax
    
    Rnd[(number)]
    
    The optional number argument is a Single or any valid numeric expression.
    

    返回值

    如果数字为 Rnd生成
    大于零 序列中的下一个随机数。
    未提供 序列中的下一个随机数。
    小于零 每次使用相同的数字,使用数字作为种子。
    等于零 最近生成的数字。

    根据这一点,您需要应用粗体文本。