Bogaso

Asked: 2024-05-05 18:54:16 +0800 CST2024-05-05 18:54:16 +0800 CST 2024-05-05 18:54:16 +0800 CST

Uso da função rnd() em VBA

Eu tenho uma função personalizada definida como abaixo

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

No entanto, recebo dois valores diferentes Rnd(Seed)de MsgBox. No entanto, desde que consertei a semente, esperava obter os mesmos valores.

Você poderia me ajudar a entender como a semente funciona emrnd()

Best Answer

Black cat

Isto é da ajuda do Excel VBA

Returns a Single containing a random number.

Syntax

Rnd[(number)]

The optional number argument is a Single or any valid numeric expression.

Valores de retorno

Se o número for	Rnd gera
Maior que zero	O próximo número aleatório na sequência.
Não fornecido	O próximo número aleatório na sequência.
Menos que zero	O mesmo número sempre, usando o número como semente.
Igual a zero	O número gerado mais recentemente.

De acordo com isso você precisa aplicar o texto em negrito.

relate perguntas