Visual Basic Forum

Djawed · Newbie Anmeldedatum: 14.12.2009 Beiträge: 3

Hallo VB-Profis,

ich hab vor kurzem angefangen vb6 zu erlernen, und hätte eine frage bezüglich eines Problems!

Ziel ist es durch einen Button(bn_start) zufällige Matheaufgaben z.B.(4+6) auszulösen die in einem Label(lb_aufgabe) angezeigt werden, die antwort will ich per Textbox (tb_antwort) dann vom Benutzer erzwingen. Ist die Antwort wahr dann soll MsgBox "Richtig", falls die Antwort falsch ist,dann soll die MsgBox "Richtig" kommen. Problem an der Sache ist,das es nicht funktioniert:

ich hab euch mal hier den bisherigen Code mal reingeschrieben:

private sub bn_start_Click()

Randomize
zahl1 = Int(Rnd * 100) + 1
zahl2 = int(Rnd * 100) + 1
erg = zahl1 + zahl2
lb_aufgabe = CStr(zahl1) + " + " + CStr(zahl2)
tmp = me.tb_antwort.text
if tmp = erg then MsgBox "richtig" Else MsgBox "falsch"
End sub

Egal was ich im textfeld eingebe, es kommt falsch raus!
Hoffe ihr könnt mir weiter helfen,ist bestimmt eine simple Frage!
_________________

christopher.g · Überflieger Anmeldedatum: 03.05.2008 Beiträge: 536

hey
na das is ja klar du kannst ja nicht hellsehen oder?

wenn du auf den button drückst bist du immer eine rechnung hinten nach!

du musst das also umdrehen
in der form load

Djawed · Newbie Anmeldedatum: 14.12.2009 Beiträge: 3

Wenn ich jetzt dann auf den Button klicke, dann kommt immer noch die MsgBox "Falsch", aber jetzt habe ich wenigstens danach die Möglichkeit die Aufgabe zu beantworten, problem ist aber das ich dazu immer den button klicken muss um zu wissen ob es richtig oder falsch war!!!
_________________