Artigo: 194914 - Última revisão: quarta-feira, 14 de Julho de 2004 - Revisão: 3.2

Como minimizar todas as janelas do Visual Basic

Vista lado a ladoClique aqui para exibir o artigo traduzido e o artigo original em inglês, lado a lado.
Tradução automáticaVer isenção de responsabilidades para tradução automática
Ver produtos para os quais este artigo se aplica.
Dica do SistemaEste artigo aplica-se a um sistema operativo diferente do que está a utilizar. Foi desactivado o conteúdo do artigo, que pode não ser relevante para si.

Nesta página

Expandir tudo | Reduzir tudo

Sumário

Por vezes, pretende programaticamente minimizar todas as janelas visíveis. Utilizar a API keybd_event, isto pode facilmente ser efectuado.
Voltar ao topo

Mais Informação

O truque é simular os eventos de teclado necessários para colocar o menu de contexto da barra de tarefas e enviá-lo a letra "M" para seleccionar a opção "Minimizar todas as janelas". Isto é conseguido com três chamadas a keybd_event API.

O segundo argumento para a chamada keybd_event é o código de verificação de hardware e, neste caso, pode utilizar o valor 91. No entanto, uma vez que as aplicações não devem utilizar o código de verificação, foi deixada como 0.
Voltar ao topo

Exemplo passo a passo

  1. Inicie um novo projecto EXE padrão. É criado o Form1 por predefinição.
  2. Coloque um CommandButton para Form1.
  3. Copie e cole o seguinte código na janela de código do Form1. 
          Private Declare Sub keybd_event Lib "user32" ( _
         ByVal bVk As Byte, _
         ByVal bScan As Byte, _
         ByVal dwFlags As Long, _
         ByVal dwExtraInfo As Long)

      Const KEYEVENTF_KEYUP = &H2
      Const VK_LWIN = &H5B

      Private Sub Command1_Click()
         ' 77 is the character code for the letter 'M'
         Call keybd_event(VK_LWIN, 0, 0, 0)
         Call keybd_event(77, 0, 0, 0)
         Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)
      End Sub
  4. Prima a tecla F5 para executar a aplicação e clique no Command1. Minimize a todas as janelas visíveis.
Voltar ao topo

Referências

Para mais informações, consulte procura na keybd_event no Win32 Programmer referência ou O Microsoft Developer Network (MSDN) Library CD-ROM.
Voltar ao topo
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 6.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
Voltar ao topo
Palavras-chave: 
kbmt kbapi kbhowto KB194914 KbMtpt
Voltar ao topo
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 194914  (http://support.microsoft.com/kb/194914/en-us/ )
Voltar ao topo