eDIP240 data... fehlt

[bertl100]

Hab ein Beispiel dafür gerade gefunden.

DIM MyEinzelByte AS BYTE
DIM MyStrlen AS BYTE
DIM MyIndex AS BYTE

MyString = "Hello, World"
MyStrlen = LEN(MyString)
FOR MyIndex = 1 TO MyStrlen
MyEinzelByte = MyArray(MyIndex)
NEXT