jag håller på att göra ett program där man ska kunna ha kontroll över sina pengar.
men det är i QB.
när man startar står det hur mycket man har och om man vill sätta in eller ta ut ( + eller -)
sen skriver man hur mycket det är man ska sätta in eller ut
men sen nästa gång vill jag att själva pengarna ska stå kvar som man satte in
alltså i början
här är koden:
CLS
pengar = 0
PRINT ""; pengar; ""
INPUT "sätta eller ta ut?? ", fraga1$
SELECT CASE fraga1$
CASE "+"
INPUT "hur mycket ", fraga2
pengar = pengar + fraga2
PRINT ""; pengar; ""
CASE "-"
INPUT "hur mycket ", fraga2
pengar = pengar - fraga2
PRINT ""; pengar; ""
END SELECT

ps
börja inte snacka om att QB suger

QB Suger

//peterh

Hejsan Kan inte QB men....
Om Du vill att värdet ska kvarstå även när du stänger ner programmet så måste du lagra undan senaste värdet tex i ett textdokument.

Så när du kör programmet nästa gång hämtar du detta värdet och tilldelar "pengar" detta värde..

Sååå kan du inte sätta pengar = 0 :-))

du använder dig av
<code>
open "Filnamn" for input as #1
input #1, pengar
close #1

'kod...


open "Filnamn" for output as #1
print #1, pengar
close #1
</code>

/Niklas Jansson