Software Developer's Kit - ChemDraw

Send comments on this topic
Remove Method
See Also 
index
The location of the object in the collection that will be removed.

Description

Member of ChemDraw Control.Menus.

Removes a menu object from the collection of the menu collection.

Syntax

Visual Basic
Public Sub Remove( _
   ByRef index As Variant _
) 

Parameters

index
The location of the object in the collection that will be removed.

Example

Private Sub cmdApplication_click()
   'Declares variables 
    Dim myMenu As ChemDrawControl11Ctl.Menu
    Dim myMenus As ChemDrawControl11Ctl.Menus
    Dim myMenuBar As ChemDrawControl11Ctl.MenuBar
    Dim myMenuBars As ChemDrawControl11Ctl.MenuBars
    Dim myMenuItem As ChemDrawControl11Ctl.MenuItem
    Dim myMenuItems As ChemDrawControl11Ctl.MenuItems
   'Returns number of MENU BARS 
    Text1.Text = "menuBars " & ctlChemDraw.Application.MenuBars.Count
    Set myMenuBar = ctlChemDraw.Application.MenuBars.Item(1)  
    'Returns number of MENUS 
    Text2.Text = "menus " & myMenuBar.Menus.Count
    Set myMenus = myMenuBar.Menus  
    myMenus.Add "Menu Caption", 3
    ctlChemDraw.UpdateMenus
    Text3.Text = myMenus.Item(3).Caption
    myMenus.Remove 3
    ctlChemDraw.UpdateMenus
   'Returns menus properties 
    Text4.Text = myMenus.Application
    Text5.Text = myMenu.Count
End Sub

See Also