Professional Development with Visio® 2000

Toolbars

In many ways, toolbars are highly similar to menus. Figure 19.3 is the object model for the toolbars.

Figure 19.3. Toolbars in the Visio object model.

The important distinction to keep in mind here is that the set of IDs used to index ToolBarSets is different than that for MenuSets.

Listing 19.4 is a skeleton code framework for accessing toolbar items:

Listing 19.4. Accessing a Toolbar Item

Public Sub AccessAWeeToolbarItem() Dim UIObj As Visio.UIObject Dim ToolbarSetsObj As Visio.ToolbarSets Dim ToolbarSetObj As Visio.ToolbarSet Dim ToolbarObj As Visio.Toolbar Dim ToolbarItemObj As Visio.ToolbarItem Set ToolbarSetsObj = UIObj.ToolbarSets ...