ZenMenus.Create

Create(bsName As String) As ZenMenu

Parameters

bsName As String

A string which defines the name of the menu.

Example: "menu_1"

Remarks

Creates a context menu or a main menu depending on the "IsPulldown" property of the zMenu object (False = context menu, True = main menu).

Sample:

Sub CreateMenus()

Dim zMenus As ZenMenus  'Parent object
Dim zMenu As ZenMenu	'Child object

Set zMenus = MyWorkspace.ActiveDocument.ZenMenus

'Creates a context menu
Set zMenu = zMenus.Create("menu_1")
zMenu.IsPulldown = False

'Creates a main menu
Set zMenu = zMenus.Create("menu_2")
zMenu.IsPulldown = True

End Sub

See Also

ZenMenus, ZenMenu