Module Module1

    Sub Main()
        'Declare Variables of type integer
        Dim valueOne As Integer
        Dim valueTwo As Integer
        'A const variable to hold the value that each number will be 
        'multiplied by
        'Const variable can not be modified
        Const multiplyer As Integer = 12

        Try
            Console.WriteLine("Please enter a number between 1 and 12")
            valueOne = Integer.Parse(Console.ReadLine())

            'Use And operator to determine whether the number entered 
            'by the user is between 1 and 12

            'Note: The conditional-AND operator (AND) performs a 
            'logical-AND of its bool operands, but only evaluates its second operand if necessary.
            If (valueOne > 0 And valueOne < 13) Then
                valueTwo = valueOne * multiplyer
                Console.WriteLine("{0} x {1} = {2}", valueOne, multiplyer, valueTwo)
            Else
                Console.WriteLine("You didn't enter a number between 1 and 12")
            End If

            'Handle the exception generated by wrongly formatted user input
        Catch ex As System.FormatException
            Console.WriteLine("You didn't enter a Whole Number!")
        End Try

        Console.WriteLine(vbCrLf + "Please Press any Key to Exit")
        System.Console.ReadKey()
    End Sub

End Module