Como Exibir Várias Linhas em uma MsgBox no Visual Basic

Ao exibir mensagens em uma MsgBox, pode ser necessário dividir o texto em múltiplas linhas para facilitar a leitura. No Visual Basic, isso pode ser feito utilizando o caractere especial Chr(13) ou vbCrLf para representar a quebra de linha.

Exemplo 1: Usando Chr(13)

Dim Mens As String
Mens = "Linha número 1" + Chr(13)
Mens = Mens + "Linha número 2" + Chr(13)
Mens = Mens + "Linha número 3"
MsgBox Mens

Exemplo 2: Usando vbCrLf (Forma Recomendada)

Dim Mens As String
Mens = "Linha número 1" & vbCrLf & _
       "Linha número 2" & vbCrLf & _
       "Linha número 3"
MsgBox Mens

Explicação do Código

Chr(13): Representa o caractere de retorno de carro (Enter), quebrando a linha.
vbCrLf: Equivalente a Chr(13) & Chr(10), representando Enter + Nova linha (forma recomendada).
Uso do operador &: Para concatenar strings corretamente no Visual Basic, prefira & em vez de +.


Outras Dicas sobre MsgBox no Visual Basic

1. Exibir um Título Personalizado

MsgBox "Linha 1" & vbCrLf & "Linha 2", vbInformation, "Aviso Importante"

2. Exibir Botões Personalizados

Dim resposta As Integer
resposta = MsgBox("Deseja continuar?", vbYesNo + vbQuestion, "Confirmação")

If resposta = vbYes Then
    MsgBox "Você escolheu Sim."
Else
    MsgBox "Você escolheu Não."
End If

Posts Similares