String.Chars Property gets the Char object at a specified position in the current String object.
Class MainClass Shared Sub Main() Dim str1 As String = "Test"
For ctr As Integer = 0 to str1.Length - 1
Console.Write("{0} ", str1(ctr))
Next End Sub End Class