Применение
Объект Form |
Объект Report |
Свойство 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