• Home
 · 
• String Manipulation
 · 
• Read character by character in a string.

Read character by character in a string.

Read character by character in a string.

Rate Read character by character in a string.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

mystring ="hello"

dim counter as long
dim mystring as string
lengthofstring = Len(mystring)
If lengthofstring > 0 Then
For counter = 1 To lengthofstring
character1 = Mid(mystring, counter, 1)
MsgBox character1
Next counter
else
msgbox "please enter a string first"
end if