Imports System

Public Module Module1

    Public Sub Main()

           Dim a As Integer

​

        For a = 4 To 28 Step 4

            Console.WriteLine(a)

        Next a

        Console.ReadLine()

​

​

    End Sub

End Module