Zahlenraterätsel!

moddoK

Grünschnabel
Moin
ich bin gerade dabei nen einfachen zahlengenerator zu coden, was auch klappt
nur die abfrage, ob die im textfeld eingegebene zahl die richtige ist, klappt nicht

hier der code:
Visual Basic:
Private Sub cmd_ok_Click()
lbl_eingegeben_zahl = txt_zahl
If lbl_eingebene_zahl < 1 Then
txt_zahl = "Bitte nur Zahlen von 1-6!"
End If
If lbl_eingegebene_zahl_ > 6 Then
txt_zahl = "Bitte nur Zahlen von 1-6!"
End If
Randomize
X = CInt((Rnd * 5) + 1)
lbl_generiert_zahl = X
If lbl_eingegeben_zahl = X Then lbl_ergebnis = "Richtig" Else
lbl_ergebnis = "Leider falsch -.-"
End If
End Sub



Wenn ich es ausführe und auf "OK" klicke, kommt immer: "Fehler beim Komplimieren. End If ohne If-Block"
Danach ist die erste zeile gelb hinterlegt.

Screenshot:
http://img152.imageshack.us/img152/9389/snap265yk5.jpg


Kann mir jemand sagen, was ich falsch gemacht habe? :suchen:


MfG, moddoK :-(
 
Zurück