Imports System
 
Public Class Test
	Public Shared Sub Main()
		Dim intInput As Integer
System.Console.WriteLine("Enter an integer…")
intInput = Val(System.Console.ReadLine())
If intInput = 1 Then
System.Console.WriteLine("Thank you.")
ElseIf intInput = 2 Then
System.Console.WriteLine("That's fine.")
ElseIf intInput = 3 Then
System.Console.WriteLine("Too big.")
Else
System.Console.WriteLine("Not a number I know.")
End If
Console.ReadKey()
	End Sub
End Class

SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQlEaW0gaW50SW5wdXQgQXMgSW50ZWdlcgpTeXN0ZW0uQ29uc29sZS5Xcml0ZUxpbmUoIkVudGVyIGFuIGludGVnZXLigKYiKQppbnRJbnB1dCA9IFZhbChTeXN0ZW0uQ29uc29sZS5SZWFkTGluZSgpKQpJZiBpbnRJbnB1dCA9IDEgVGhlbgpTeXN0ZW0uQ29uc29sZS5Xcml0ZUxpbmUoIlRoYW5rIHlvdS4iKQpFbHNlSWYgaW50SW5wdXQgPSAyIFRoZW4KU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKCJUaGF0J3MgZmluZS4iKQpFbHNlSWYgaW50SW5wdXQgPSAzIFRoZW4KU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKCJUb28gYmlnLiIpCkVsc2UKU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKCJOb3QgYSBudW1iZXIgSSBrbm93LiIpCkVuZCBJZgpDb25zb2xlLlJlYWRLZXkoKQoJRW5kIFN1YgpFbmQgQ2xhc3M=