Imports System

Public Module Module1

    Public Sub Main()

        For intCount as Double = 1 to 10 Step 1

        Console.WriteLine(intCount)

    Next

    End Sub

End Module