Imports System

Public Module Module1

    Public Sub Main()

        dim count,num as integer

        count = 0

        num = 1

        For count = 1 To  10

        console.WriteLine(num)

        num = num + 1

    Next 

    End Sub

End Module