VBA: Vergleichen von Ergebnissen

[|\/| E P H I S t 0]

Hallo!


Ich bin VBA Noob, und würd gern wissen warum folgendes nicht funktioniert:

[...]------------------------------------------------------------
Randomize
Dim z1, z2, erg, antwre

z1 = Int((100 * Rnd) + 1)
z2 = Int((100 * Rnd) + 1)
erg = z1 + z2

antwre = InputBox("Was ist " & z1 & " + " & z2 & " ?", "Rechenaufgabe")
If antwre = erg Then
GoTo mehrr
Else
GoTo mehrf
End If
[...]-------------------------------------------------------------

Es sollte folgendes machen: Rechenbeispiel stellen, bei Richtiger Antwort zur Marke "mehrr" springen, bei falscher zur "mehrf", er springt jedoch immer zu "mehrf", auch bei richtigem Ergebnis.

Was hab ich da falsch gemacht?
(Ich weiß, is ne dumme Frage, und ziemlich "noob-haft", aber jeder fängt mal an.

Dankes