---

Dim Str as String
Dim CharArray() as Byte
Dim i as integer

Str = "Dette er min string"
ReDim CharArray(Len(Str))
For i = 1 to Len(Str)
   CharArray(i) = Asc(Mid$(Str,i,1))
Next i

---

Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.