Vsebina

# Funkcija Rnd

Vrne naključno številko med 0 in 1.

## Skladnja:

    Rnd [(Izraz)]

## Vrnjena vrednost:

Double

## Parametri:

Izraz: Nima učinka, če ga podate, je prezrt.

Funkcija Rnd vrne desetiške ulomke od 0 (vključno) do 1 (izključno) v skladu z enakomerno porazdelitvijo. Uporablja generator naključnih števil Mersenne Twister 19937. Za tvorbo naključnih celih števil v danem obsegu uporabite formulo kot v spodnjem primeru. Ukaz Randomize z določeno vrednostjo semena lahko uporabite pred tem, če želite napovedljiv niz števil.

### Kode napak:

5 Neveljaven klic procedure

## Primer:

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "Število od 1 do 5"
            Case 6, 7, 8
                Print "Število od 6 do 8"
            Case Is > 8 And iVar < 11
                Print "Večje od 8"
            Case Else
                Print "Izven obsega 1 do 10"
        End Select
    End Sub

Podobne teme

Ukaz Randomize