Atribuut Hwnd (Akna pide)

Rakenduskoht

Atribuudi hWnd abil saate määratleda pideme (kordumatu pika täisarvu väärtuse), mille Microsoft Windows on praegusele aknale määranud. Loetav/kirjutatav pikk täisarv.

expression.Hwnd

avaldis Nõutav. Avaldis, mis tagastab loendi Rakenduskoht objekti.

Kommentaarid

See atribuut on saadaval ainult makro või VBA (Visual Basic for Applications) koodi kasutamise korral.

Atribuuti saate VBA koodis kasutada Windowsi rakenduse programmeerimisliidese (API) funktsioonide või muude välisrutiinide kutsumisel, kus atribuut hWnd on nõutav argument. Paljud Windowsi funktsioonid nõuavad ühe argumendina praeguse akna atribuudi hWnd väärtust.

Kuna selle atribuudi väärtus võib mõne programmi töötamise ajal muutuda, ärge talletage atribuudi hWnd väärtust avalik muutuja.

Näide.

Järgmises näites kasutatakse atribuuti hWnd koos Windowsi API funktsiooniga IsZoomed, et teha kindlaks, kas aken on maksimeeritud.

' 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