Imports System

Public Module Module1

    Public Sub Main()

        dim firstName as string 

        dim age as string

        dim favouriteColour as string 

        Dim lastName as string

        Console.writeline("what is your first name?")

        firstName= console.readline()

        Console.writeline("Cool! What is your last name?")

        lastName = console.readline()

        Console.writeline("how old are you?")

        age = console.readline()

        console.writeline("That's cool!")

        console.writeline("What is your favourite colour?")

        favouriteColour = console.readline()

        If favouriteColour = "Black" or favouriteColour = "black" then 

            console.writeline("Me too!!")

        elseIf favouriteColour = "white" or favouriteColour = "White" then

            console.writeline("My favourite colour is black")

        Else

            console.writeline("wow!")

        end if 

    End Sub

End Module