Imports System

​

Public Module Module1

​

    Public Sub Main()

        dim Table as integer

        do

            console.writeline("enter times table")

            Table = console.ReadLine()

            for number = 1 to 10

                console.writeline(Table & " x " & number & " = " & number * table)

            next

    loop while Table <> 11

    End Sub

End Module

​