Aplica-se a
Objeto Form |
Objeto Report |
Pode utilizar a propriedade hWnd para determinar o identificador (um valor exclusivo de Número Inteiro Longo) atribuído pelo Microsoft Windows à janela atual. Número Inteiro Longo de leitura/escrita.
expressão.Hwnd
expressão Obrigatório. Uma expressão que devolve um dos objetos na lista Aplica-se A.
Observações
Esta propriedade está disponível apenas se utilizar uma macro ou código VBA (Visual Basic for Applications).
Pode utilizar esta propriedade no código VBA ao fazer chamadas para as funções da interface de programação de aplicações (API) do Windows ou para outras rotinas externas que precisem da propriedade hWnd como argumento. Muitas funções do Windows precisam do valor da propriedade hWnd da janela atual como um dos argumentos.
Uma vez que o valor desta propriedade pode mudar enquanto um programa está em execução, não armazene os valores da propriedade hWnd numa variável pública.
Exemplo
O exemplo seguinte utiliza a propriedade hWnd com a função IsZoomed da API do Windows para determinar se uma janela está maximizada.
' Enter on single line in Declarations
' section of Module window.
Declare Function IsZoomed Lib "user32" _
(ByVal hWnd As Long) As Long
Sub Form_Activate()
Dim intWindowHandle As Long
intWindowHandle = Screen.ActiveForm.hWnd
If Not IsZoomed(intWindowHandle) Then
DoCmd.Maximize
End If
End Sub