Imports System

​

Public Module Module1

    Public Sub Main()

        Dim Input1, Input2 as String

        Console.WriteLine("Please input first string.. ")

        Input1 = Console.ReadLine()

        Console.WriteLine("Please input second string... ")

        Input2 = Console.ReadLine()

        If Input1 <> Input2 Then

            Console.WriteLine("The strings don't match!")

        else

            Console.WriteLine("The strings matched!")

        End If

    End Sub

End Module