Visualizzare dati per righe e colonne
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 |
NOMI[ 1]="Anna" ' Tanti nomi a caso... NOMI[ 2]="Annalisa" NOMI[ 3]="Annabella" NOMI[ 4]="Anna" NOMI[ 5]="Annalisa" NOMI[ 6]="Annabella" NOMI[ 7]="Anna" NOMI[ 8]="Annalisa" NOMI[ 9]="Annabella" NOMI[10]="Anna" NOMI[11]="Anna" NOMI[12]="Annalisa" NOMI[13]="Annabella" NOMI[14]="Anna" NOMI[15]="Annalisa" NOMI[16]="Annabella" NOMI[17]="Anna" NOMI[18]="Annalisa" NOMI[19]="Annabella" NOMI[20]="Anna" TextWindow.WriteLine("1234567890123456789012345678901234567890") For i=1 To 20 If(i < 10)Then TextWindow.CursorLeft=5 Else TextWindow.CursorLeft=4 EndIf TextWindow.Write(i) TextWindow.CursorLeft=25 TextWindow.Write(i) TextWindow.CursorLeft=10 TextWindow.Write(NOMI[i]) TextWindow.CursorLeft=40-Text.GetLength(NOMI[i]) TextWindow.WriteLine(NOMI[i]) EndFor TextWindow.WriteLine("1234567890123456789012345678901234567890") |