Braucht man einen zufälligen Wert, also einen nicht vorher festgelegten Wert bzw. einen sich ändernden Wert, nutzt man Zufallszahlen. In Visual Basic gibt es zwei Möglichkeiten, Zufallszahlen zu erstellen.

 

Möglichkeit 1: Zufallszahl per Klasse Random

Hierbei wird eine Variable oder ein Menge von Variablen (Felder / Arrays) der Klasse Random erzeugt. Man deklariert zunächst eine neue Instanz und initialisiert sie in einem zweiten Schritt:

Dim zufallzahl As New Random
Label1.Text = zufallszahl.Next

 

Die Klasse Random bietet neben der Methode Next weitere Methoden (Auswahl):

Equals(Object) Bestimmt, ob das angegebene Objekt mit dem aktuellen Objekt identisch ist
GetHashCode  Fungiert als die Standardhashfunktion
Next  Gibt eine nicht negative Zufallszahl zurück
Next(Int32)  Gibt eine nicht negative Zufallszahl bis zum angegebene Maximum zurück
Next(Int32, Int32)  Gibt eine Zufallszahl im angegebenen Bereich zurück
NextBytes  Füllt die Elemente eines angegebenen Bytearrays mit Zufallszahlen
NextDouble  Gibt eine Zufallszahl zwischen 0,0 und 1,0 zurück
Sample  Gibt eine Zufallszahl zwischen 0,0 und 1,0 zurück

 

 

Möglichkeit 2: Zufallszahl per Funktion Rnd()

Hierbei wird ein Zufallswert, der kleiner als 1, aber größer oder gleich 0 ist per Funktionsaufruf Rnd() generiert. Bei jedem Aufruf dieser Funktion wird ein neuer zufälliger Wert zurückgegeben.

Randomize()  ‘ruft den Zufallszahlengenerator auf
Dim zufallzahl As Integer  ‘deklariert eine neue Variable vom Typ Integer
zufallzahl = CInt(10 * Rnd())  ‘erzeugt eine Zufallszahl zw. 1 und 10
Label1.Text = zufallzahl  ‘gibt den Wert im im Label aus

 

Übungen

Zufallszahl.pdf