Objeto WebListBox (Publisher)

Representa um controlo de caixa de listagem Web. O objeto WebListBox é um membro do objeto Shape .

Comentários

Utilize o método Shapes.AddWebControl para criar uma nova caixa de listagem Web.

Utilize a propriedade Shape.WebListBox para aceder a uma forma de controlo de caixa de listagem Web.

Utilize o método AddItem do objeto WebListBoxItems para adicionar itens a uma caixa de listagem Web.

Exemplo

Este exemplo cria uma nova caixa de listagem Web e adiciona vários itens à mesma. Tenha em atenção que, quando criado inicialmente, um controlo de caixa de listagem Web contém três itens predefinidos. Este exemplo inclui uma rotina que exclui os itens de caixa de listagem padrão antes de adicionar novos itens.

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

Propriedades

• Application
• ListBoxItems
• MultiSelect
• Responsável
• ReturnDataLabel

Confira também

• Referência do Modelo de Objeto do Publisher

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.