Contact: aviboots(AT)netvision.net.il
41,215 questions
53,717 answers
573 users
Imports System Public Class Program Public Shared Sub Main() Dim arr As Integer() = {3, 8, 9, 1, 7, 0, 5, 6, 4} For i As Integer = 0 To arr.Length - 1 Step 2 Console.Write(arr(i) & " ") Next End Sub End Class ' run: ' ' 3 9 7 5 4 '