Função MsgBox

Aplica-se a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Em um banco de dados da área de trabalho do Access, a MsgBox função exibe uma mensagem em uma caixa de diálogo, aguarda que o usuário selecione um botão e retorna uma Integer mensagem que indica qual botão o usuário selecionou.

Sintaxe

MsgBox(prompt[, buttons][, title][, helpfile][, context])

A MsgBox sintaxe da função tem estes argumentos:

Argumento Descrição
prompt Obrigatório. Expressão de cadeia de caracteres exibida como a mensagem na caixa de diálogo. O comprimento máximo é de cerca de prompt 1024 caracteres, dependendo da largura dos caracteres usados. Se prompt houver mais de uma linha, você poderá separar as linhas usando um caractere de retorno de carro (Chr(13)), um caractere de alimentação de linha (Chr(10)) ou uma combinação de retorno de carro-alimentação de linha (Chr(13) & Chr(10)) entre cada linha.
buttons Opcional. Expressão numérica que é a soma dos valores que especificam o número e o tipo de botões a serem exibidos, o estilo do ícone a ser usado, a identidade do botão padrão e a modalidade da caixa de mensagem. Se omitido, o valor buttons padrão é 0.
title Opcional. Expressão de cadeia de caracteres exibida na barra de título da caixa de diálogo. Se você omitir title, o nome do aplicativo aparecerá na barra de título.
helpfile Opcional. Expressão de cadeia de caracteres que identifica o arquivo de Ajuda a ser usado para fornecer Ajuda contextual para a caixa de diálogo. Se helpfile for fornecido, context também deve ser fornecido.
context Opcional. Expressão numérica que é o número de contexto da Ajuda atribuído ao tópico apropriado da Ajuda pelo autor da Ajuda. Se context for fornecido, helpfile também deve ser fornecido.

Configurações

As buttons configurações de argumento são:

Constante Valor Descrição
vbOKOnly 0 Exibir apenas OK .
vbOKCancel 1 Exibir OK e Cancelar.
vbAbortRetryIgnore 2 Exibir anular, repetir e ignorar.
vbYesNoCancel 3 Exibir Sim, Não e Cancelar.
vbYesNo 4 Exibir Sim e Não.
vbRetryCancel 5 Exiba Tentar e Cancelar.
vbCritical 16 Exibir o ícone Mensagem Crítica .
vbQuestion 32 Exibir o ícone Warning Query .
vbExclamation 48 Exibir o ícone da Mensagem de Aviso .
vbInformation 64 Exibir o ícone da Mensagem de Informação .
vbDefaultButton1 0 Torne o primeiro botão o padrão.
vbDefaultButton2 256 Torne o segundo botão o padrão.
vbDefaultButton3 512 Torne o terceiro botão o padrão.
vbDefaultButton4 768 Faça do quarto botão o padrão.
vbApplicationModal 0 Aplicativo modal. O usuário deve responder à caixa de mensagem antes de continuar o trabalho no aplicativo atual.
vbSystemModal 4096 Modal do sistema. Todos os aplicativos serão suspensos até que o usuário responda à caixa de mensagem.
vbMsgBoxHelpButton 16384 Adicione um botão Ajuda à caixa de mensagem.
VbMsgBoxSetForeground 65536 Especifique a janela da caixa de mensagem como a janela de primeiro plano.
vbMsgBoxRight 524288 Alinhar o texto à direita.
vbMsgBoxRtlReading 1048576 Faça o texto aparecer com leitura da direita para a esquerda nos sistemas hebraico e árabe.

O primeiro grupo de valores (0 a 5) descreve o número e o tipo de botões exibidos na caixa de diálogo. O segundo grupo (16, 32, 4864, ) descreve o estilo do ícone. O terceiro grupo (0, 256, 512) determina qual botão é o padrão. O quarto grupo (0, 4096) determina a modalidade da caixa de mensagem. Ao adicionar números para criar um valor final para o buttons argumento, use apenas um número de cada grupo.

Observação

Essas constantes são especificadas pelo Visual Basic for Applications. Como resultado, você pode usar os nomes em qualquer lugar do código em vez dos valores reais.

Valores retornados

Constante Valor Descrição
vbOK 1 OK
vbCancel 2 Cancelar
vbAbort 3 Anular
vbRetry 4 Repetição
vbIgnore 5 Ignorar
vbYes 6 Sim
vbNo 7 Não

Comentários

Quando ambos helpfile e context são fornecidos, o usuário pode pressionar F1 no Windows ou Ajuda no macOS para exibir o tópico da Ajuda correspondente a context. Alguns aplicativos host, como o Microsoft Excel, também adicionam automaticamente um botão Ajuda à caixa de diálogo.

Se a caixa de diálogo exibir um botão Cancelar , pressionar Esc terá o mesmo efeito que selecionar Cancelar. Se a caixa de diálogo contiver um botão Ajuda , será fornecida uma Ajuda contextual para a caixa de diálogo. No entanto, nenhum valor é retornado até que o usuário selecione um dos outros botões.

Observação

Para especificar mais do que o primeiro argumento nomeado, use MsgBox em uma expressão. Para omitir alguns argumentos posicionais, você deve incluir o delimitador de vírgula correspondente.

Exemplo

Observação

O exemplo a seguir demonstra como usar essa função em um módulo do Visual Basic for Applications (VBA).

Este exemplo usa a MsgBox função para exibir uma mensagem de erro crítico em uma caixa de diálogo com botões Sim e Não . O botão Não é especificado como a resposta padrão. O valor retornado pela MsgBox função depende do botão que o usuário seleciona. Este exemplo pressupõe que DEMO.HLP seja um arquivo de Ajuda que contém um tópico com um número de contexto de Ajuda igual a 1000.

Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"    ' Perform some action.
Else    ' User chose No.
    MyString = "No"    ' Perform some action.
End If