Imports System

Public Module Module1

    Public Sub Main()

        dim lightColour= ""

        Console.WriteLine("input a traffic light colour")

        lightColour = console.ReadLine()    

        if lightColour = "Green" then

            console.WriteLine("go")

        elseif lightColour = "amber" then

            console.WriteLine("get ready")  

        end if

    End Sub

End Module