Contact: aviboots(AT)netvision.net.il
39,926 questions
51,859 answers
573 users
Imports System Public Module Module1 Public Sub Main() Dim arr() As Char = {"a", "b", "c", "d"} For Each item As Char In arr Console.WriteLine(item) Next End Sub End Module ' run ' ' a ' b ' c ' d '