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