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