Imports System
Public Class Program
Public Shared Sub Main()
Dim s As String = "vb.net programming"
Dim arr As char() = s.ToCharArray()
For Each ch In arr
Console.WriteLine(ch)
Next
End Sub
End Class
' run:
'
' v
' b
' .
' n
' e
' t
'
' p
' r
' o
' g
' r
' a
' m
' m
' i
' n
' g
'