Fehler in meiner For schleife
Übersicht

![]() |
SnadeBetreff: Fehler in meiner For schleife |
![]() Antworten mit Zitat ![]() |
---|---|---|
ich hab gerade mit bb angefangen (vor 3 tagen) und bin gerade dabei ein bank simmulator zu erstellen
Code: [AUSKLAPPEN] ;Start
AppTitle "Bank v1,01" For bsp=1 To 3 Print "Hallo Wilkommen!" Print "Wiviel moechten sie abheben?" ;Value (abzuhebender Betrag) Print "20" Print "50" Print "100" Print "200" Print "500" ;Input Betrag = Input$("Bitte waehlen sie einen Betrag: ") Select Betrag Case 20 Print "Sie haben 20 Euro gewaehlt" Case 50 Print "Sie haben 50 Euro gewaehlt" Case 100 Print "Sie haben 100 Euro gewaehlt" Case 200 Print "Sie haben 200 Euro gewaehlt" Case 500 Print "Sie haben 500 Euro gewaehlt" Default Print "Ungueltiger Betrag " WaitKey End End Select Mehr = Input$("Wollen sie mehr abheben?(y/n) ") Select Mehr Case "y" Print "Ok heben sie noch mehr ab sie BONZE ;)" Case "n" Print "!!!" Default Print "WIE MEINEN??" End Select Next ;ENDE WaitKey End so das ist der source code wenn ich jetz aber bei Code: [AUSKLAPPEN] case "n"
"end" eintrage dann kommt immer die fehlermeldung das next ohne for ist oder er printet mir case "y" hin also "Ok heben sie noch mehr ab sie BONZE ![]() und das 2. problem is auch das erste wenn ich dann z.B. "b" eingebe also im programm dann kommt wieder die nachricht von case "y" und auch wenn ich "n" eingebe kommt wieder case "y" hab keine ahnung brauche hilfe xD mfg. Snade[/code] |
||
![]() |
Snade |
![]() Antworten mit Zitat ![]() |
---|---|---|
KANN closed werden falls welche denn gleichen fehler haben diese problem loest man mit der repeat schlife wahr bloss noch nich soweit *gg*
Code: [AUSKLAPPEN] ~DEIN CODE~
Mehr$ = Input$("Wollen sie mehr abheben?(y/n) ") Until Mehr$ <> "y" |
||
![]() |
ToeB |
![]() Antworten mit Zitat ![]() |
---|---|---|
Erster ganz klarer fehler :
Code: [AUSKLAPPEN] Mehr = Input("...")
Wird so nicht kallpen im zusammenhang mit Code: [AUSKLAPPEN] Select Mehr
Case "n" ... End Select Da Mehr als Integer und nicht als String "gekennzeichnet" wurde... Mach einfach ein "$" hinter mehr : Code: [AUSKLAPPEN] Mehr$ = Input("...") Dann sollte es klappen...
mfg ToeB |
||
Religiöse Kriege sind Streitigkeiten erwachsener Männer darum, wer den besten imaginären Freund hat.
Race-Project - Das Rennspiel der etwas anderen Art SimpleUDP3.0 - Neuste Version der Netzwerk-Bibliothek Vielen Dank an dieser Stelle nochmal an Pummelie, welcher mir einen Teil seines VServers für das Betreiben meines Masterservers zur verfügung stellt! |
Übersicht


Powered by phpBB © 2001 - 2006, phpBB Group