String und byte

[x-ryder]

also so funztes bei mir super:

Dim Tmpbytevar As String * 1
Dim Rline1 As String * 8
Dim Radiotext(8) As Byte

Rline1 = "HALLOWEL"

Dim I As Byte

For I = 1 To 8

Tmpbytevar = Mid(rline1 , I , 1)
Radiotext(i) = Tmpbytevar

Next I

Martin