Como fazer o código VBA esperar por uma informação do usuário
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 2x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Em alguns casos é necessário interromper a execução de um código para aguardar por uma informação do usuário. Nestes casos, utiliza-se do argumento WindowMode setado para acDialog, do comando Docmd.OpenForm. No exemplo abaixo, o código aguarda pelo fechamento do formulário frmRegistro para então processar as linhas seguintes. Observe os comentários:
Public Sub fncCapturaRegistro() On Error Resume Next '-----------------------------------------------------------------------------
'Abre o formulário frmRegistro, solicitando a interrupção do código (acDialog)
'---------------------------------------------------------------------------- DoCmd.OpenForm "frmRegistro", , , , , acDialog, 1 '---------------------------------------------------------------------------
'A rotina prossegue a partir deste ponto, somente quando o usuário fechar
'o formulário.
'A variável global booRegistrado tem seu valor definido no formulário
'frmRegistro, por isso é necessário que a rotina aguarde por este valor.
'--------------------------------------------------------------------------- If booRegistrado = False Then
'Sai do aplicativo DoCmd.Quit acQuitSaveAll End If End Sub
Bom estudo!
Os dez artigos mais visitados
MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Aprenda sobre filtragens
Vídeo - Segurança máxima, usando o OPEN
Uma ajuda para quem está começando um negócio ou um projeto
Desabilitando a faixa(ribbon) superior do Access
Vídeo - Programação de relatórios - Parte 1
Integrando o Access com Servidor MySQL - Introdução
Como carregar o seu menu sem que ele vá para lista de suplementos
Adquira o kit UsandoAccess e aprenda em alta velocidade
| Não há comentário |