Was willst du ? Du hast doch Basic auch gut im Griff !!
Naja, dafür musste ich 3 mal ins Helpfile schauen!
Den Code hier verstehe ich aber immer noch nicht so ganz.
Code:
Dim Zeile as String * 28
Dim Zeichen as String * 1
Dim Reihe as Byte
Dim Spalte as Byte
Dim Nummer as Byte
Restore Daten
For Reihe = 1 To 24
Read Zeile
For Spalte = 1 To 28
Zeichen = Mid(Zeile , Spalte , 1)
Nummer = Asc(Zeichen)
If Nummer > 32 Then Nummer = Nummer - 48
Print Chr(Nummer)
Next Spalte
Next Zeile
Wo endet die For-Schleife? Was bringt next Zeile?
Woher weiß Read, welches Data er lesen soll, liest es bei jedem Aufruf einfach die nächste Zeile?
Kann man nicht direkt in eine Data-Zeile springen?
Kann man ein zweites Datafeld machen (data2).
MFg moritz
Lesezeichen