WebListBox object (Publisher)
Represents a web list box control. The WebListBox object is a member of the Shape object.
Remarks
Use the Shapes.AddWebControl method to create a new web list box.
Use the Shape.WebListBox property to access a web list box control shape.
Use the AddItem method of the WebListBoxItems object to add items to a web list box.
Example
This example creates a new web list box and adds several items to it. Note that when initially created, a web list box control contains three default items. This example includes a routine that deletes the default list box items before adding new items.
Note
When you create a web list box, its initial width is 300 points. However, Microsoft Publisher automatically changes this width based on the width of the items in the list.
Sub CreateWebListBox()
Dim intCount As Integer
With ActiveDocument.Pages(1).Shapes
With .AddWebControl(Type:=pbWebControlListBox, Left:=100, _
Top:=150, Width:=300, Height:=72).WebListBox
.MultiSelect = msoFalse
With .ListBoxItems
For intCount = 1 To .Count
.Delete (1)
Next
.AddItem Item:="Green"
.AddItem Item:="Purple"
.AddItem Item:="Red"
.AddItem Item:="Black"
End With
End With
End With
End Sub
Properties
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.