Imports System

Public Module Module1

    Public Sub Main()

        Dim dia as string

        Console.WriteLine("Escriba un dia de la semana")

        dia = console.ReadLine()

        If dia = "lunes" then 

            Console.WriteLine("El dia es lunes!!")

        else 

            Console.WriteLine("El dia no es lunes")

        end if

    End Sub

End Module