Imports System

Public Module Module1

    'declaring the variables that I need

    Dim name As String

    Dim answerMusic As String

    'declare any new variable that you might need

    Public Sub Main()

        'asking the user for their name

        Console.WriteLine("Hi, my name is Siri. What is your name?")

        'placing the user input into the variable name

        name = Console.ReadLine()

        'greeting the user also using their name

        Console.WriteLine("Hello " & name & "!")

        'asking a question

        Console.WriteLine("Would you like me to sing a song? y/n ")

        'getting the answer (user input)

        answerMusic = Console.ReadLine()

        'SELECTION: depending on the answer, executing different instructions

        If answerMusic = "y" Then

            Console.WriteLine("Im like yeah shes fine wonder when she'll be mine")

        Else

            Console.WriteLine("OK. No singing then...")

        End If

        'EXERCISE 1

        '----------

        'ask the user if they like cats

        Console.WriteLine("Do you like cats?")

        'get the answer from the user

            answerMusic = Console.ReadLine()

        'SELECTION: if the user says yes, then tell the user that you like cats too

        '           otherwise tell the user that cats can be scary sometimes

        If answerMusic = "yes" Then

            Console.WriteLine("Omg!!YAAAAASSS! Cats are awesome")

        Else

            Console.WriteLine("I know right! Hairballs and that. Yuck")

        End If

        'EXERCISE 2

        '----------

        'ask the user what is their favourite colour

        Console.WriteLine("What's your fav colour?")

        'get the answer from the user

        answerMusic = Console.ReadLine()

        'SELECTION: if the user says green, then tell the user that you like green too 

        '           otherwise tell the user that the colour they said is nice, but you prefer green

        If answerMusic = "blue" Then

            Console.WriteLine("Omg! I love blue too we're like sisters!")

        Else

            Console.WriteLine("Thats my fave colour too!!!!")

        End If

​

        'Well done so far! Now click on share, take the link and submit it in the assignment on Google Classroom. Or.. do the extension first!

        'EXTENSION FOR EXPERTS!

        '----------------------     

​

        'ask the user if they have a dog

        'get the answer from the user

        'SELECTION: if the user says yes, then ask the user what is the dog's name

​

​

        '                                  get the answer from the user

        '                                  tell the user that you like (dog's name) very much

​

        '           otherwise ask the user what would be the perfect name for a dog

        '                                  get the answer from the user

        '                                  tell the user that you like that name very much

        'Well done! Now click on share, take the link and submit it in the assignment on Google Classroom

    End Sub

End Module