Функция GetMenu

Declare Function GetMenu Lib "user32" (ByVal hWnd As Long) As Long

GetMenu идентифицирует, какое меню назначено на данное окно. Это меню появляется как строка меню окна

Возвращаемое значение

Функция возвращает описатель верхнего меню окна. Если окно не имеет меню, то функция возвращает 0. Если окно, указанное в списке параметра - дочернее окно, возвращаемое значение функции бессмысленно

Параметры

hWnd
Описатель окна для получения меню

Пример

' Сначала создайте с помощью Menu Editor
' маленькую систему меню на Form1

' Определим дескриптор меню формы
Dim hMenu As Long 
' получаем дескриптор меню формы
hMenu = GetMenu(Form1.hWnd)
Debug.Print hmenu

Смотри также

GetSystemMenu

Категория

Меню