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