InfoConnect VBA Guide
Attachmate.Reflection.Objects.Emulation.IbmHosts Library / ContextMenu Object / RemoveItem Method
Identifies the position within the menu at which to remove a menu item.
Example
In This Topic
    RemoveItem Method (ContextMenu)
    In This Topic
    Removes a specified context menu item at a given position within the menu
    Syntax
    expression.RemoveItem( _
   ByVal index As Integer _
)
    where expression is a variable that represents a ContextMenu Object

    Parameters

    index
    Identifies the position within the menu at which to remove a menu item.
    Example
    This example removes a menu item named "Open Word" from a custom menu.
    Public Sub RemoveMenuItem()
 
    Dim menuItems() As ContextMenuItem
    
    Dim i As Long
    
    Dim menu As contextMenu
       
    'Get the custom menu.
    Set menu = ThisIbmTerminal.ContextMenus.ItemByName("myContextMenu")
 
    'Get the menu items in the menu.
    menuItems = menu.MappingCollection
 
    'Find the menu item and remove it.
    For i = 1 To UBound(menuItems)
        Debug.Print menuItems(i).Name
        If menuItems(i).Name = "Open Word" Then
            Debug.Print i & menuItems(i).Name & menu.Count
            menu.RemoveItem (i)
        End If
    Next
 
    'Update the menu
    ThisIbmTerminal.ContextMenus.Add menu
    
End Sub
    See Also

    Reference

    ContextMenu Object
    ContextMenu Members

    Send Feedback