Share via


Shape.WebOptionButton Property (Publisher)

Returns the WebOptionButton object associated with the specified shape.

Syntax

expression .WebOptionButton

expression A variable that represents a Shape object.

Return Value

WebOptionButton

Example

This example creates a new Web option button and specifies that its default state is selected.

Dim shpNew As Shape 
Dim wobTemp As WebOptionButton 
 
Set shpNew = ActiveDocument.Pages(1).Shapes.AddWebControl _ 
 (Type:=pbWebControlOptionButton, Left:=100, _ 
 Top:=123, Width:=16, Height:=10) 
 
Set wobTemp = shpNew.WebOptionButton 
 
wobTemp.Selected = msoTrue