Code Wiederholen
16.02.2016 22:53:19
Nenad
Ich bin dabei einen Aufzug zu programmieren, doch es klappt nicht so einfach. Das Problem dabei ist, wie kann ich denn geschriebenen Code mehrmals wiederholen z.B. 10 mall, wenn ich denn Button nur einmal anklicke. Die Stockwerke habe ich mit zufallszahlen programmiert, doch jedes Mal muss ich denn Button anklicken damit ich eien neue Zufallszahl generiere. Ich wäre sehr dankbar wenn mir jemand helfen könnte!
Das habe ich bereits ausprobiert und es funktioniert nicht.
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles bt_Zufallszahl.Click
Dim i As Integer
For i = 1 To 10
Next ' Das habe ich bereits ausprobiert es Funktioniert aber nicht
Dim zufall As New Random
Dim zufallszahl As Integer
zufallszahl = zufall.Next(1, 5) & vbCrLf
lbl_SollZustand.Text = zufallszahl
tuerbewegung("zu")
Aufzugbewegung.Enabled = True
Türbewegung_Zu.Enabled = False
End Sub