Gælder for
Formularobjekt |
Rapportobjekt |
Du kan bruge egenskaben hWnd til at bestemme håndtag (en entydig Langt heltal-værdi), der tildeles af Microsoft Windows til det aktuelle vindue. Læs/skriv Lang.
udtryk.HWnd
udtryk Påkrævet. Et udtryk, der returnerer et af objekterne på listen Gælder for.
Bemærkninger
Denne egenskab er kun tilgængelig ved hjælp af en makro eller VBA-kode (Visual Basic for Applications).
Du kan bruge denne egenskab i VBA-kode, når du kalder Windows API-funktioner (Application Programming Interface) eller andre eksterne rutiner, der kræver egenskaben hWnd som et argument. Mange Windows-funktioner kræver egenskabsværdien hWnd for det aktuelle vindue som et af argumenterne.
Fordi værdien af denne egenskab kan ændres, mens et program kører, skal du ikke gemme egenskabsværdien hWnd i en offentlig variabel.
Eksempel
I følgende eksempel anvendes egenskaben hWnd med Windows API-funktionen IsZoomed til at bestemme, om et vindue er maksimeret.
' 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