Praktische Qbasic funktionen und Codes
Weiterlaufende Uhr in der rechten oberen Ecke:
DO
LOCATE 1, 72: PRINT TIME$
LOOP UNTIL INKEY$ = CHR$(13)
Durch die Funktion Locate bleibt die Augabe immer an der gleichen Stelle.
Wenn ENTER (Ascii: 13) gedrückt wird, wird das Programm beendet.
CHR$(ASCII-Code%) ist eine praktische Funktion zur Ausgabe von verschiedenen Zeichen, die nicht auf der Tastatur
vorhanden sind. Die Funktion ASC(Zeichen$) gibt den Ascii code des Zeichens aus.
Ausführen von Funktionen, wenn eine Taste gedrückt wird
INPUT "EINGABE: ", in$
SELECT CASE in$
CASE IS = "a"
[Anweisungsblock]
CASE IS = "b"
PRINT "b Gedrückt"
END SELECT
Nur Klein oder Großbuustaben
per LCASE$(Variable$) und UCASE$(Variable$) kann man Stings nur in Große oder in Kleine Buchstaben umwandeln
Test$ = "Dings"
PRINT LCASE$(Test$), "in kleinbuchstaben"
PRINT UCASE$(TEST$), "IN GROSSBUCHSTABEN"
Das wars erstmal, beim nächsten mal zeichnen wir mit QB :biggrin:
-AlienDwarf