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.
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:
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.
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 .
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 .
