Método Show
Exibe um objeto UserForm.
Sintaxe
[ objeto ]. Mostrarmodal
A sintaxe do método Show conta com as partes a seguir:
Parte | Descrição |
---|---|
objeto | Opcional. Uma expressão do objeto que é avaliada como um objeto na lista Aplica-se a. Se o objeto for omitido, assume-se que o UserForm associado ao móduloUserForm ativo é objeto. |
modal | Opcional. Valor booliano que determina se UserForm é modal ou não. |
Configurações
As configurações de modal são:
Constante | Valor | Descrição |
---|---|---|
vbModal | 1 | UserForm é uma janela restrita. Padrão. |
vbModeless | 0 | UserForm não tem janela restrita. |
Comentários
Se o objeto especificado não é carregado quando o método Show é usado, o Visual Basic o carregará automaticamente.
Observação
No Microsoft Office 97, se um UserForm estiver definido para ser exibido como uma janela sem restrições, ele causa um erro de tempo de execução; os UserForms do Office 97 são sempre janelas restritas.
Quando um UserForm não é uma janela restrita, o código subsequente é executado da maneira que é encontrado. Os formulários de modelação não aparecem na barra de tarefas e não estão na ordem do separador da janela.
Observação
Você pode perder os dados associados a um UserForm sem restrições se realizar alterações em um projeto UserForm que faz com que ele recompile. Para isso, ele pode remover um módulo do código.
Quando um UserForm é modal, o usuário deve responder antes de usar qualquer parte do aplicativo. Nenhum código subsequente é executado até o UserForm ser oculto ou não carregado. Embora outros formulários no aplicativo sejam desabilitados quando um UserForm é exibido, outros aplicativos não são.
Exemplo
O exemplo a seguir considera dois UserForms em um programa. No evento de Initialize de UserForm1, UserForm2 é carregado e exibido. Quando o usuário clicar em UserForm2, ele é ocultado e UserForm1 é exibido. Quando o UserForm1 é clicado, o UserForm2 é exibido novamente.
' This is the Initialize event procedure for UserForm1
Private Sub UserForm_Initialize()
Load UserForm2
UserForm2.Show
End Sub
' This is the Click event for UserForm2
Private Sub UserForm_Click()
UserForm2.Hide
End Sub
' This is the click event for UserForm1
Private Sub UserForm_Click()
UserForm2.Show
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.