Design Property
Sets or returns a PbWizardNavBarDesign constant representing the design of the specified Web navigation bar set. Read/write.
| The Design property can be any of these PbWizardNavBarDesign constants: |
| pbnbDesignAmbient |
| pbnbDesignBaseline |
| pbnbDesignBracket |
| pbnbDesignBulletStaff |
| pbnbDesignCapsule |
| pbnbDesignCornice |
| pbnbDesignCounter |
| pbnbDesignDimension |
| pbnbDesignDottedArrow |
| pbnbDesignEdge |
| pbnbDesignEnclosedArrow |
| pbnbDesignEndCap |
| pbnbDesignHollowArrow |
| pbnbDesignKeyPunch |
| pbnbDesignOffset |
| pbnbDesignOutline |
| pbnbDesignRadius |
| pbnbDesignRectangle |
| pbnbDesignRoundBullet |
| pbnbDesignSquareBullet |
| pbnbDesignStaff |
| pbnbDesignTopBar |
| pbnbDesignTopDrawer |
| pbnbDesignTopLine |
| pbnbDesignUnderscore |
| pbnbDesignWatermark |
expression.Design
expression Required. An expression that returns a WebNavigationBarSet object.
Example
This example adds a new Web navigation bar set to every page in the active document, sets the button style to large, and then sets the design property to pbnbDesignCapsule.
Dim objWebNav As WebNavigationBarSet
Set objWebNav = ActiveDocument.WebNavigationBarSets.AddSet(Name:="newNavBar")
With objWebNav
.AddToEveryPage Left:=10, Top:=10
.ButtonStyle = pbnbButtonStyleLarge
.Design = pbnbDesignCapsule
End With