Hi, Hansie it's the middle of the night here and I only very quickly looked at your post so forgive me if this is wrong...
You want to cycle through a string and extract characters one at a time... as integers in the range 0 - 25? Okay, you should be able to adapt this code to work in your function.
Also, I think you are using the 'Upper' function wrongly. You need to reassign the new string to the old one, like this:
You want to cycle through a string and extract characters one at a time... as integers in the range 0 - 25? Okay, you should be able to adapt this code to work in your function.
Open in online IDELocal MyString$,Length,Char MyString$ = "ABCD" Length = Len(MyString$) For i = 1 To Length Char = Asc(Mid(MyString$,i,1)) - 65 Print Char Next WaitKey End
Also, I think you are using the 'Upper' function wrongly. You need to reassign the new string to the old one, like this:
a$ = Upper(a$)