| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
Alprausch
Anmeldungsdatum: 24.10.2009
Beiträge: 47
Wohnort: Schweiz
|
 Verfasst am: 24.10.2009, 17:31 Titel: Währungsumrechner |
 |
|
Hallo Leute
Ich bin neu hier und habe mich bei www.tutorials.at ins Tutorial von QBasic eingelesen und mich mal versucht.
Auch habe ich das QB-Kochbuch brav heruntergeladen und ausgedruckt damit ich ein Nachschlagewerk habe. Die Liste der Befehle und Funktionen darf ich natürlich auch mein Eigen nennen 
Leider ist es nicht ganz so gekommen wie ich es wollte. Das Programm arbeitet ohne Probleme. Nur wenn ich es als .exe ausführe sieht man das Ergebnis nicht mehr. Das Programm beendet sich zu schnell 
Wenn man das ganze aber in QBasic 4.5 ausführt läuft es ohne Probleme.
Auch wird das Ergebnis leider nicht auf 2 Kommastellen gerundet. Hab in der MonsterFAQ schon gesucht. Aber dafür bin ich wohl noch zu wenig fortgeschritten damit ich das verstehen kann.
PS: Dies ist mein erstes Programm. Gebt mir doch bitte Eure Meinungen und evtl. Tipps dazu.
Hmmm. Sehe gerade dass ich gar kein .zip hochladen kann. Na ja, nicht so schlimm. ich stelle einfach mal den Quellcode in diesen Beitrag damit alle ihn sehen können.
Nochmal hmmmm. Wie kann ich den Quellcode kopieren und hier einfügen? Das geht mit ctrl+c und ctrl+v so schlecht...
Mit freundlichen Grüssen
Reto |
|
| Nach oben |
|
 |
St_W
Anmeldungsdatum: 22.07.2007
Beiträge: 956
Wohnort: Austria
|
| Verfasst am: 24.10.2009, 17:46 Titel: |
|
|
Hallo und Willkommen hier im Forum!
| Zitat: | | Nur wenn ich es als .exe ausführe sieht man das Ergebnis nicht mehr. Das Programm beendet sich zu schnell. |
Das liegt in den meisten Fällen daran, dass nach der Ausgabe des Ergebnisses das Programm sofort beendet wird. Um dies zu verhindern und den Benutzer zum Drücken einer Taste aufzufordern, um das Programm zu beenden, baue am Ende deines Programmes, nach der Ausgabe des Ergebnisses, ein "SLEEP" ein.
| Zitat: | Hmmm. Sehe gerade dass ich gar kein .zip hochladen kann. Na ja, nicht so schlimm. ich stelle einfach mal den Quellcode in diesen Beitrag damit alle ihn sehen können.
Nochmal hmmmm. Wie kann ich den Quellcode kopieren und hier einfügen? Das geht mit ctrl+c und ctrl+v so schlecht... |
Das geht ganz einfach:
Mit dem "Edit" Button rechts oben bei deinem Beitrag kannst du deinen Beitrag bearbeiten. In dem erscheinenden Textfeld drückst du dann auf den Button "Code", fügst deinen Quellcode ein, und drückst erneut auf den Button "Code". Alternativ kannst du auch [ code] und [ /code] (jeweils ohne das Leerzeichen nach der Klammer) manuell am Anfang und das zweite am Ende deines Quellcodes schreiben.
Jedenfalls sollte es im Editor dann ungefähr wie folgend zu lesen sein:
| Code: | | Mein Beitragstext [ code]Mein Quellcode[ /code] |
, wobei natürlich Beitragstext deinem Text und Quellcode deinem Quellcode entspricht.
Ich hoffe die Antwort hat dir etwas weitergeholfen,
MfG,
St_W
_________________
Aktuelle FreeBasic Builds, Projekte, Code-Snippets unter http://users.freebasic-portal.de/stw/
http://www.mv-lacken.at Musikverein Lacken (MV Lacken) |
|
| Nach oben |
|
|
Alprausch
Anmeldungsdatum: 24.10.2009
Beiträge: 47
Wohnort: Schweiz
|
| Verfasst am: 24.10.2009, 17:53 Titel: |
|
|
Hallo
Die Antwort hat mir leider nicht sehr geholfen.
Ich kann den Quellcode gar nicht aus QBasic kopieren. Im Menü "Bearbeiten" kann ich zwar kopieren auswählen, aber es wird nicht das aus QBasic eingefügt.
mfg Reto |
|
| Nach oben |
|
|
MOD
Fleißiger Referenzredakteur
Anmeldungsdatum: 10.09.2007
Beiträge: 1003
|
| Verfasst am: 24.10.2009, 18:01 Titel: |
|
|
Hi,
das Edit war auf das Forum bezogen.
Um den Code aus QB rauszukriegen musst du den Code speichern mit der Option "für andere Programme lesbar" oder so ähnlich.
Dann kannst du die .bas-Datei mit einem Editor deiner Wahl öffnen und den Code rauskopieren und ins Forum reinstellen, jeweils mit den code-Klammern wie das St_W beschrieben hat. |
|
| Nach oben |
|
|
Alprausch
Anmeldungsdatum: 24.10.2009
Beiträge: 47
Wohnort: Schweiz
|
| Verfasst am: 24.10.2009, 18:08 Titel: |
|
|
Hallo
Ok. Ich hab es. Vielen dank. Hier also mein Quellcode:
------------------------
Quellcode start:
------------------------
| Code: |
' ************************************************************************
' * *
' * Waehrungsumrechner CHF - EUR - $ *
' * *
' * geschrieben von Reto Marty 24.10.2009 *
' ************************************************************************
CLS
PRINT "Waehrungsumrechner CHF - EUR - $"
PRINT "Wechselkurse aktuell vom 24.10.2009"
PRINT "1 = CHF -> EUR"
PRINT "2 = CHF -> $"
PRINT "3 = EUR -> CHF"
PRINT "4 = EUR -> $"
PRINT "5 = $ -> CHF"
PRINT "6 = $ -> EUR"
INPUT "Geben Sie bitte die gewuenschte Nummer ein: ", eingabe
SELECT CASE eingabe
CASE 1
INPUT "Eingabe CHF: ", chf
ergebnis# = chf * .6745
PRINT chf; " CHF sind "; ergebnis#; " EUR."
CASE 2
INPUT "Eingabe CHF: ", chf
ergebnis# = chf * .9909
PRINT chf; " CHF sind "; ergebnis#; " $."
CASE 3
INPUT "Eingabe EUR: ", eur
ergebnis# = eur * 1.5143
PRINT eur; " EUR sind "; ergebnis#; " CHF."
CASE 4
INPUT "Eingabe EUR: ", eur
ergebnis# = eur * 1.5006
PRINT eur; " EUR sind "; ergebnis#; " $."
CASE 5
INPUT "Eingabe $: ", dol
ergebnis# = dol * 1.0091
PRINT dol; " $ sind "; ergebnis#; " CHF."
CASE 6
INPUT "Eingabe $: ", dol
ergebnis# = dol * .6664
PRINT dol; " $ sind "; ergebnis#; " EUR."
END SELECT
PRINT ""
PRINT ""
PRINT TAB(60);
COLOR 1
PRINT "24.10.2009 Reto Marty"
SLEEP
|
------------------------
Quellcode ende:
------------------------
PS: Das mit dem Sleep hat top funktioniert.
mfg Reto |
|
| Nach oben |
|
|
nemored
Anmeldungsdatum: 22.02.2007
Beiträge: 4700
Wohnort: ~/
|
| Verfasst am: 25.10.2009, 15:16 Titel: |
|
|
| Code: | | PRINT INT(do1*100+.5)/100 |
sollte die Zahl auf zwei Stellen hinter dem Komma gerundet ausgeben (kaufmännische Rundung).
_________________
Deine Chance beträgt 1:1000. Also musst du folgendes tun: Vergiss die 1000 und konzentriere dich auf die 1. |
|
| Nach oben |
|
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
