Свойство Hwnd

Применение

Свойство hWnd можно использовать для определения дескриптора (уникального значения типа "длинное целое"), который назначен текущему окну системой Microsoft Windows. Возвращает доступное для чтения и записи значение типа Long.

выражение.Hwnd

выражение (обязательно). Выражение, возвращающее один из объектов из списка "Применение".

Замечания

Это свойство можно задать только с помощью макроса или кода Visual Basic для приложений (VBA).

Свойство можно использовать в коде VBA при вызове функций API Windows или других внешних подпрограмм, для которых требуется свойство hWnd в качестве аргумента. Многим функциям Windows требуется значение свойства hWnd текущего окна в качестве одного из аргументов.

Следует хранить значение свойства hWnd в общей переменной, так как оно может измениться при выполнении программы.

Пример

В следующем примере свойство hWnd используется с функцией IsZoomed из API Windows, чтобы определить, развернуто ли окно на полный экран.

' 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