Contact: aviboots(AT)netvision.net.il
39,955 questions
51,897 answers
573 users
Module Module1 Sub Main() Dim arr(25) As Char For i As Integer = 0 To 25 arr(i) = Chr(97 + i) Next For Each ch In arr Console.Write(ch + " ") Next End Sub End Module ' run: ' ' a b c d e f g h i j k l m n o p q r s t u v w x y z