expression.Selected(Index, SelectState)
expression Required. An expression that returns one of the objects in the Applies To list.
Index Required Long. The number of the Web list box item.
SelectState Required Boolean. True to select the list item.
Example
This example verifies that an existing Web list box control allows selecting multiple entries and then selects two items in the list.
Sub SelectListBoxItem()
With ActiveDocument.Pages(1).Shapes(1) _
.WebListBox
If .MultiSelect = msoTrue Then
With .ListBoxItems
.Selected Index:=1, SelectState:=True
.Selected Index:=3, SelectState:=True
End With
End If
End With
End Sub