Imports System
Public Module Module1
Public Sub Main()
Dim s as integer
Console.WriteLine("Input a Number")
s= Console.ReadLine()
If s=1 then
Console.WriteLine("one")
Elseif s=2
Console.WriteLine("two")
Else If s=3
Console.WriteLine("three")
Else If s=4
Console.WriteLine("four")
Else If s=5
Console.WriteLine("five")
Else
Console.WriteLine("Invalid Input")
End If
End Sub
End Module