QBASIC - Statements - PRINT

| PRINT zoner | TAB() | SPC() | PRINT USING | PRINT to file |

 

PRINT - special ASCII codes

Bel 13 CarriageReturn (NewLine)
9 Tab 28 Move Right
10 LineFeed (NewLine) 29 Move Left
11 Locate 1,1 30 Move Up
12 CLS 31 Move Down

 

Med kode 9 indsættes et tabulator-tegn. Qbasic benytter som standard en tabulatorafstand på 8 tegn
- d.v.s. tab-positionerne 1, 9, 17, o.s.v.:  >TAB()

PRINT "12"; CHR$(9); "34"; CHR$(9); "56"
PRINT "12"; TAB(9); "34"; TAB(17); "56"
12      34      56
12      34      56

 

Kode 10 (LineFeed) og kode 13 (CarriageReturn) har samme effekt i Qbasic: Linjeskift

a$ = "123" + CHR$(10) + "456"
PRINT a$
123
456

 

Med koderne 28-31 kan udskrift-positionen flyttes:

 
PRINT "123" + CHR$(30) + CHR$(29) + "456"
  456
123

 

PRINT zoner

Med semikolon som separator udskrives uden mellemrum
- bemærk, at tal altid udskrives med et foranstillet og et efterstillet mellemrum:

PRINT "1"; "2"; "3"; "4"; "5"
PRINT 1; 2; 3; 4; 5
12345
1  2  3  4  5

Med komma som separator udskrives i næste print-zone - bredden af hver zone er 14 tegn.
Resultatet er det samme som med de viste TAB() værdier:

PRINT "1", "2", "3", "4", "5"
PRINT TAB(1); "1"; TAB(15); "2"; TAB(29); "3"; TAB(43); "4"; TAB(57); "5"
1             2             3             4             5
1             2             3             4             5

 

PRINT TAB()

Udskriver i den angivne kolonne - evt på næste linie:

PRINT TAB(20); "A"; TAB(30); "B"; TAB(10); "C"
                   A         B
         C

>PRINT zoner >PRINT SPC() >ASCII kode 9: TAB

 

PRINT SPC()

Udskriver mellemrum. Resultatet er det samme som med SPACE$(), men:
- SPC() indsætter mellemrum, som kun kan bruges i PRINT-sætninger.
- SPACE$() returnerer en STRING af mellemrum, som kan bruges generelt.

PRINT SPC(20); "A"; SPC(30); "B"; SPC(10); "C"
PRINT SPACE$(20); "A"; SPACE$(30); "B"; SPACE$(10); "C"
                    A                              B          C
                    A                              B          C

>PRINT TAB() >SPACE$()

 

PRINT USING

 

PRINT to file

PRINT is used for output to sequential files

OPEN "test.txt" FOR OUTPUT AS #1
PRINT #1, "Fornavn, Efternavn", "Adresse"
File:
Fornavn, Efternavn          Adresse

Formatering af data med PRINT USING:

a = 5
b = 3.14
c = 215.789
PRINT #1, USING "####.##"; a; b; c
PRINT #1, USING "####.##,"; a; b; c
 
File:
   5.00   3.14 215.79
   5.00,   3.14, 215.79,