'Declaration
Public Sub SetItemVisible( _
ByVal As Tool, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As Boolean, _
ByVal As Boolean _
)
'Usage
Dim instance As ToolbarContextMenu
Dim tool As Tool
Dim topMenuId As Integer
Dim subMenuId As Integer
Dim visible As Boolean
Dim exclusive As Boolean
instance.SetItemVisible(tool, topMenuId, subMenuId, visible, exclusive)