DropDown 方法示例

下例用 DropDown 方法来显示组合框中的列表。用户可以通过单击命令按钮来显示组合框列表。

窗体包含：

• 名为 ComboBox1 的组合框。
• 名为 CommandButton1 的命令按钮。

Sub UserForm_CommandButton1_Click()
    UserForm_ComboBox1.DropDown
End Sub

Sub UserForm_Initialize()
    UserForm_ComboBox1.AddItem "Turkey"
    UserForm_ComboBox1.AddItem "Chicken"
    UserForm_ComboBox1.AddItem "Duck"
    UserForm_ComboBox1.AddItem "Goose"
    UserForm_ComboBox1.AddItem "Grouse"
End Sub