顯示下拉式方塊的清單部分

下列範例會使用 DropDown 方法在 ComboBox中顯示清單。 使用者可以按一下CommandButton來顯示ComboBox清單。

若要使用本範例，請將此範例程式碼複製到表單的指令碼編輯器中。 若要執行該程式碼，您需要開啟該表單以啟動 Open 事件。 請確定表單包含：

• 一個名為 ComboBox1 的 ComboBox 。

• 一個名為 CommandButton1 的 CommandButton 。

Dim ComboBox1 
 
Sub CommandButton1_Click() 
 ComboBox1.DropDown 
End Sub 
 
Sub Item_Open() 
 Set ComboBox1 = Item.GetInspector.ModifiedFormPages.Item("P.2").Controls("ComboBox1") 
 ComboBox1.AddItem "Turkey" 
 ComboBox1.AddItem "Chicken" 
 ComboBox1.AddItem "Duck" 
 ComboBox1.AddItem "Goose" 
 ComboBox1.AddItem "Grouse" 
End Sub

支援和意見反應

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