Data Types VB.Net

Imports System
Class Sample
   Public Shared Sub Main()
      Dim str As String = "012asdf789"
      Dim arr() As Char
      arr = str.ToCharArray(3, 4)
      Console.Write(arr)
      Dim c As Char
      For Each c In arr
         Console.WriteLine(c)
      Next c
   End Sub 'Main
End Class 'Sample