Contact: aviboots(AT)netvision.net.il
39,924 questions
51,857 answers
573 users
Module Module1 Sub Main() For i As Integer = 10 To 1 Step -1 Console.WriteLine(i) Next End Sub End Module ' run: ' ' 10 ' 9 ' 8 ' 7 ' 6 ' 5 ' 4 ' 3 ' 2 ' 1