WebListBox オブジェクト (Publisher)

  • [アーティクル]

Web リスト ボックス コントロールを表します。 WebListBox オブジェクトは、Shape オブジェクトのメンバーです。

注釈

Shapes.AddWebControl メソッドを使用して、新しい Web リスト ボックスを作成します。

Web リスト ボックス コントロール図形にアクセスするには 、Shape.WebListBox プロパティを使用します。

WebListBoxItems オブジェクトの AddItem メソッドを使用して、Web リスト ボックスに項目を追加します。

例

この例では、新しい Web リスト ボックスを作成し、それに複数の項目を追加します。 最初に作成されたとき、Web リスト ボックス コントロールには 3 つの既定の項目が含まれていることに注意してください。 この使用例では、新しい項目を追加する前に、既定のリスト項目を削除します。

注:

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

プロパティ

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。