Imports System 'Required for all programs in VB.NET
Public Module Module1 'Open a module
Public Sub Main() 'Open a subroutine
Dim intInput as string 'Declare variable intInput as string
Console.WriteLine("Enter your age") 'Console asks user to "enter your age"
intInput = Console.ReadLine() 'Variable intInput is set by user response
IF intInput < 13 THEN 'If the user response is less then 13, then
Console.WriteLine("Wow... a computer genious") 'Console responds as "wow... a computer genius"
ELSE IF intInput < 20 THEN 'If the user is less then 20 then
Console.WriteLine("Hello Teenager") 'Console responds as "Hello teenager"
END IF
'Error - console does not respond to an age above or equal to 20
End Sub
End Module