Объект WebListBoxItems (Publisher)

Представляет элементы в элементе управления "Список веб-страниц".

Замечания

Используйте свойство ListBoxItems объекта WebListBox для доступа к элементам в списке веб-сайтов.

Используйте метод AddItem для добавления элементов в список веб-сайтов.

Пример

В этом примере создается новое поле списка веб-сайтов и добавляется в него несколько элементов. Обратите внимание, что при первоначальном создании элемент управления веб-списка содержит три элемента по умолчанию. Этот пример включает подпрограмму, которая удаляет элементы списка по умолчанию перед добавлением новых элементов.

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

Методы

• AddItem
• Delete
• Item
• Selected

Свойства

• Приложение
• Count
• Parent

См. также

• Справочник по объектной модели издателя

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.