Funktion ZufallsInteger()

Gibt eine Zufallszahl im angegebenen Bereicht (Unten, Oben) zurück%%%
Function ZufallsInteger(Unten, Oben)

' ---------------------------------------------------------
' Gibt eine Zufallszahl im angegebenen Bereicht
' (Unten, Oben) zurück
' ---------------------------------------------------------

    Randomize
    ZufallsInteger = Int((Oben - Unten + 1) * Rnd + Unten)

End Function



Funktion ZufallsInteger() Funktion ZufallsInteger() Funktion ZufallsInteger() Funktion ZufallsInteger() http://www.inhaltszentrale.de http://www.seitenzentrale.de http://www.access-home.de http://www.access-home.de http://www.access-home.de http://www.access-home.de http://www.access-home.de Funktion ZufallsInteger() Funktion ZufallsInteger()