Publisher) (WebListBox 物件

表示 Web 清單方塊控制項。 WebListBox物件是Shape物件的成員。

註解

使用 Shapes.AddWebControl 方法來建立新的 Web 清單方塊。

使用 Shape.WebListBox 屬性可存取 Web 清單方塊控制項圖形。

使用WebListBoxItems物件的AddItem方法，將專案新增至 Web 清單方塊。

範例

此範例會建立新的 Web 清單方塊，並在其中新增數個專案。 請注意，一開始建立時，Web 清單方塊控制項包含三個預設專案。 本範例會包含加入新的項目之前刪除的預設值] 清單方塊項目常式。

注意事項

當您建立 Web 清單方塊時，其初始寬度為 300 點。 然而，Microsoft Publisher 會根據清單中的項目寬度來自動變更此寬度。

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

屬性

• Application
• ListBoxItems
• MultiSelect
• Parent
• ReturnDataLabel

另請參閱

• Publisher 物件模型參考

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。