DIM
hMenuChildren
AS
.MenuChildren
DIM
hMenu
AS
Menu
FOR EACH
hMenu
IN
hMenuChildren
...
NEXT
Перечисляет всех наследников меню.