You probably need to get each character of your string and stick it into an array that is the same size of the length of your string.
Something like this:
For i = 1 to Len(str)
char = Left(str, 1)
array(i-1) = char
str = Right(str, Len(str) - i)
Next
Good luck!