Module Module1 Sub Main() Dim valueOne As Integer Dim valueTwo As Integer 'A const variable to hold the value that each number will be 'multiplied by 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 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