1

Salut c'est Cdbvs


J'ouvre ce nouveau topic car la question n'est pas la même que celui que j'avais créé pour le minioffice, mais il corresponds en fait à sa suite, en quelque sorte.


Je détaille:

J'ai besoin d'aide en Basic car je suis vraiment nul, voici ma question:



Je crée des fenêtres ou je mes « A », « B », « C », etc.
Je demande quelles valeurs on veut ajouter avec « line input "Question";a$:cls ».
On donne donc une valeur qui s’inscrit dans la ligne désirée avec « window xx,xx,xx,xx»
Ensuite lorsque je veux un total des valeurs je fais « ? a$+b$+c$ » ( ? = print) et Basic au lieu d’additionner les valeurs, les mets les unes à la queue des autres. Exemple : a$ = 5000, b$ = 3000 et c$ = 2000. Au lieu de faire 10000, ça me donne le résultat 500030002000.

Question :
Comment on fait en Basic locomotive pour additionner les valeurs et non pas les coller les unes à la queue des autres ?

Merci.


Je mettrais mon petit programme en ligne la prochaine fois, je l'ai pas écrit, je ne m'en souviens pas de tête et comme je suis en normandie à l'heure actuelle avec une connection en Wifi particulièrement merdique, je poste illico presto.

Merci pour votre compréhension et votre aide.

A bientôt
Cdbvs
happy

2

Bon je reste connecté aujourd'hui. Quelle chanse !


10 cls:mode 2
20 window 2,12,1,2: print"A":window 2,12,2,3: print"=========":window 2,12,3,4: print"B"
30 window 2,12,4,5: print"C":window 2,12,5,6: print"D":window 2,12,6,7: print"E":window 2,12,7,8: print"F":window 2,12,8,9: print"G"
46 window 2,12,20,21: print"_________":window 2,12,21,22: print"Total":window 2,12,22,23: print"_________":window 2,12,23,24: print"H"
50 window 60,80,1,25:line input"Texte A";a$:cls:line input"B";b$:cls:line input"C";c$:cls:line input"D";d$:cls:line input"E";e$:cls:line input"F";f$:cls:line input"G";g$:cls
60 window 2,12,1,2: print a$:window 2,12,3,4: print b$:window 2,12,4,5: print c$:window 2,12,5,6: print d$:window 2,12,6,7: print e$:window 2,12,7,8: print f$:window 2,12,8,9: print g$:cls
70 window 60,80,1,25: print"Calculer les lignes: Oui, Passer tableau 2, Quitter"
80 z$=inkey$:if z$=""goto 80
90 if z$="o" then window 1,12,24,25: print a$+b$+c$+d$+e$+f$+g$ REM c'est là que ça déconne !
100 if z$="p" then goto 150:end
110 if z$="q" then stop:end
120 goto 70
150 window 14,24,1,2:line input"TexteB";aa$;cls REM à finir
160 window 14,24,1,2: print aa$ REM à finir
REM à finir


J'ai mis un espace entre : et p car sinon ça fait un smiley tongue