Imports System

Public Module Module1

    Public Sub Main()

        Dim frase As String = "E ele disse: -""Olá a todos!"""

        Console.WriteLine(frase)

    End Sub

End Module