Imports System.Text Module Tester Sub Main() Dim string1 As String = "hello" Dim i As Integer Dim charArray() As Char = string1.ToCharArray() ' display contents of charArray For i = 0 To charArray.Length - 1 Console.WriteLine(charArray(i)) Next End Sub ' Main End Module
h e l l o