Also ich hab jetzt was geschrieben und zwar wenn ich ne Taste drücke bekomme ich 2 Zufallszahlen in 2 textfenster geschrieben und ich als Anwender soll nun in ein drittes Textfenster das Ergebniss schreiben nur funzt das nicht ich zeig mal was ich hab
Dim ZufallErgebniss As Integer
Private Sub Command1_Click()
Randomize -Timer
Ergebniss = ""
Zahl1 = Int(300 * Rnd) + 1
Zahl2 = Int(50 * Rnd) + 1
End Sub
Private Sub Command2_Click()
ZufallErgebniss = Zahl1 + Zahl2
If Ergebniss = ZufallErgebniss Then
LabelRichtig.Visible = True
Else
MsgBox ("Leider Falsch")
End If
End Sub
komm da nicht weiter danke im vorraus
Dim ZufallErgebniss As Integer
Private Sub Command1_Click()
Randomize -Timer
Ergebniss = ""
Zahl1 = Int(300 * Rnd) + 1
Zahl2 = Int(50 * Rnd) + 1
End Sub
Private Sub Command2_Click()
ZufallErgebniss = Zahl1 + Zahl2
If Ergebniss = ZufallErgebniss Then
LabelRichtig.Visible = True
Else
MsgBox ("Leider Falsch")
End If
End Sub
komm da nicht weiter danke im vorraus