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 i As Integer = 0 to arr.Length - 1 Console.WriteLine(arr(i)) Next End Sub End Module ' run ' ' a ' b ' c ' d '