Imports System

Public Module Module1

    Public Sub Main()

        dim number as string 

        Console.WriteLine("Enter number")

        number = Console.ReadLine()

        For counter = 1 to 10

        Console.WriteLine(Counter*number)

    Next

    End Sub

End Module