VisualBasic Inputbox unterscheidung Abbrechen/keine Eingabe

Hansman

Lieutenant
Registriert
Juli 2012
Beiträge
715
Code:
Randomize()

zahl = Int(Rnd * 19) + 1

quadrat = zahl*zahl
Do 
antwort = inputbox ("Was ist die Wurzel aus " & quadrat)
if antwort = "" then wscript.quit
if IsNumeric(antwort) then antwort = cint(antwort)

if antwort = zahl Then
	msgbox "Richtig!"
	Wscript.quit

End if
Loop

Wie man hier sieht schreib ich grad in der Vorlesung an einem Programm, bei dem man eine Wurzel aus einer Zahl eingeben muss. (ja die if schleifen könnte man zusammenfügen aber um das gehts ja grad nicht, hab die jetzt extra zerlegt um irgendwie auf die lösung zu kommen) Abbrechen gibt ja bei der Inputbox "" zurück. Wenn ich aber das Feld leer lasse und auf Ok drücke bekomm ich ja das selbe zurück. Wie krieg ich hier ne unterscheidung hin?

Hab jetzt shcon ewig geoogelt und finde nix dazu.
 
Indem Du in dem Feld einen Text vorgibst:
Code:
antwort = inputbox ("Was ist die Wurzel aus " & quadrat, , "???")
 
Zurück
Oben