Tartalom

# Randomize utasítás

Inicializálja az Rnd függvény által használt véletlenszám-generátort.

## Szintaxis:

    Randomize [Szám]

## Paraméterek:

Szám: tetszőleges egész érték. A véletlenszám-generátor előkészítésére használatos kezdőérték. Egyenlő kezdőértékek egyenlő véletlenszám-sorozatokat eredményeznek az Rnd függvény használatakor. Ha a paraméter nincs megadva, akkor a Randomize utasítás figyelmen kívül marad.

Hacsak nem számok előre jelezhető sorozatára van szükség, akkor nem kell használni a Randomize utasítást, mivel a véletlenszám-generátor automatikusan elő lesz készítve az első használatkor - a rendszer által biztosított véletlenszám-generátor használatával, amely egyenletesen elosztott, nem determinisztikus véletlen számokat állít elő. Ha a rendszeren nem áll rendelkezésre ilyen generátor, akkor a rendszeridő kerül felhasználásra kezdőértékként.

A Randomize utasítás csak a BASIC Rnd függvényét befolyásolja, más véletlenszám-generátorokat (például a Calc RAND() függvényét stb.) nem.

### Hibakódok:

5 Érvénytelen eljáráshívás

## Példa:

    Sub ExampleRandomize
    Dim iCount As Integer, iVar As Integer, sText As String
    Dim iSpectral(10) As Integer
        Randomize 2^14-1
        For iCount = 1 To 1000
        iVar = Int(10 * Rnd) ' 0-tól 9-ig
            iSpectral(iVar) = iSpectral(iVar) +1
        Next iCount
        sText = " | "
        For iCount = 0 To 9
            sText = sText & iSpectral(iCount) & " | "
        Next iCount
        MsgBox sText,0,"Spektrális eloszlás"
    End Sub

Kapcsolódó témakörök

Rnd függvény