Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Please type 'hello' in your language")

        Dim hello As String

        hello = Console.ReadLine()

        hello = hello.ToLower

        If hello = "hello" Then

            Console.WriteLine("How are you?")

        ElseIf hello = "hola" Then

            Console.WriteLine("¿Cómo estás?")

        ElseIf hello = "你好" Then

            Console.WriteLine("你好吗")

        Else

            Console.WriteLine("Sorry, I cannot understand you.")

        End If

        Console.ReadLine()

    End Sub

End Module