Das deutsche QBasic- und FreeBASIC-Forum

[funprogger]

Ich habe folgendes Prog (ein Teil davon) geschrieben und frage mich, wieso ich mit ESC nicht abbrechen kann:

INPUT "1.Summand: ", s1
INPUT "2.Summand: ", s2
INPUT "Weitere Summanden (j/n) hinzufügen? ", jn1$
IF jn1$ = "j" THEN
summe = s1 + s2
sum = 3
PRINT "Geben sie solange weitere Summanden ein, wie sie wollen;"
PRINT "mit ESC bekommen sie das Endergebnis."
DO
PRINT sum; ".Summand:": INPUT "", suw
summe = summe + suw
PRINT
PRINT "Summe:"; summe
PRINT
sum = sum + 1
LOOP WHILE INKEY$ <> CHR$(27)

Hilfe!

[Thomas Antoni]

... weil der INPUT-Befehl nicht mit Esc abbrechbar ist, siehe den Thread "ESC Abbruch" weiter unten. Da sind detaillierte Lösungen angegeben.
_________________
+++ Die beliebte QBasic CD-ROM von QBasic.de - 670 MB QBasic-Stuff mit komfortabler HTML-Oberfläche. Für nur 5 EUR bestellbar auf www.antonis.de/qbcdueb.htm +++