Como usar a função MsgBox para personalizar as mensagens para o usuário

Como usar a função MsgBox para personalizar as mensagens para o usuário

setembro 18, 2022 0 Por Como Posso?
usando o MsgBox em VBA

A primeira coisa que você deve saber sobre MsgBox é que eles são criados por meio do código do projeto . O código é colocado dentro de um objeto e possui uma sintaxe específica. Felizmente, a sintaxe é bastante direta e você não precisa de mais habilidades de programação.

Sintaxe de um MsgBox

MsgBox (texto [, botão (s)] [, título] [, arquivo de ajuda, contexto])

  • Mensagem (prompt): é o texto que contém a mensagem que você deseja comunicar ao usuário final.
  • Título: é opcional e é o texto relacionado ao nome da mensagem. Pode ser útil fornecer ao usuário uma referência que indica o relacionamento da mensagem.
  • Botões: também é opcional e se não estiver configurado, o botão Aceitar será exibido por padrão. Algumas das constantes que podem ser configuradas para os botões são:

Sintaxe de um MsgBox

  • Arquivo de ajuda (HelpFile):  É a string de texto que contém a localização do arquivo de ajuda relacionado à mensagem. É opcional, mas caso seja colocado, o Contexto deve ser especificado.
  • Contexto: o valor numérico atribuído ao tópico de ajuda. Está relacionado ao arquivo de ajuda.

Argumento MsgBox

Existem várias maneiras de atribuir valores a um argumento de MsgBox. Uma maneira fácil de fazer isso é usando o nome da constante:

Private Sub CommandButton1_Click ()
text = “Deseja sair do sistema?” ‘message to user
style = vbYesNo + vbCritical + vbDefaultButton2′ tipos de botão
title = “MsgBox Test message” ‘message title
help = “DEMO.HLP”‘ define help file
Ctxt = 1000 ‘Define o tópico de contexto.
Resposta = MsgBox (texto, estilo, título, ajuda, Ctxt) ‘MsgBox enviada ao usuário
If Response = vbYes Then’ Se o usuário selecionar Sim
lbltexto.Caption = “Excelente” ‘A ação que é executada
Else’ Se o usuário não seleciona
lbltexto.Caption = “Nada acontece” ‘mensagem de texto que é exibida se o usuário não diz
End If

End Sub

O código anterior atribui a função MsgBox a um botão no formulário . Quando o usuário clicar no botão, aparecerá uma mensagem perguntando se deseja sair do sistema com dois botões de ação (Sim e Não), ícone de mensagem crítica.

Saiba +  Como adicionar e aplicar gradientes a formas com VBA?

Se o usuário responder que a palavra “Excelente” será exibida em uma etiqueta e se a resposta for Não, a mensagem exibida é “Nada acontece”.

Outra forma de mostrar o argumento de um MsgBox é colocando o valor de cada constante ou adicionando o valor dos argumentos. A forma anterior é mais simples porque permite interpretar o código a olho nu.

Retorna valores do MsgBox

O importante é determinar que tipo de valor está associado à resposta do usuário, assim como o nome da constante. Dependendo do valor obtido, uma ação específica pode ser atribuída . A imagem a seguir mostra os valores obtidos após pressionar um botão no MsgBox .

Retorna valores do MsgBox

Exemplos de MsgBox

Apenas o primeiro argumento (a mensagem ao usuário) é obrigatório, o resto é modificável e opcional.

1. Envie uma mensagem simples para o usuário 

Private Sub btnbienvenida_Click ()
MsgBox «Olá usuário, bem-vindo ao sistema»
End Sub

Quando a ação do botão é executada, uma mensagem de boas-vindas é mostrada ao usuário com o botão Aceitar que é exibido por padrão.

2. Envie uma mensagem ao usuário com botões

Private Sub btncontinuar_Click ()
MsgBox “Deseja continuar?”, VbYesNo + vbExclamation, “Continuar sistema”
End Sub

Este código é mais específico porque a mensagem é mostrada ao usuário, os botões “Sim” e “Não” , o ícone de ponto de exclamação e o título “Continuar sistema” são atribuídos .