1、这篇文章介绍了如何使用应用程序的宏在 Microsoft Visual Basic 来填充 列表框 或 组合框 控件的示例。 回到顶端更多信息 Microsoft 提供的编程示例只，用于说明不附带任何明示或暗示保证。这包括，但不限于对适销性或针对特定用途的适用性的暗示的担保。本文假定您熟悉演示了正在使用的编程语言以及用于创建和调试过程的工具。Microsoft 支持工程师可以帮助解释某个特定过程的功能，但他们不会修改这些示例以提供额外的功能或构建过程来满足您的具体要求。在工作表或用户窗体上，您可以使用如组合框或一个列表框的控件。用于填充控件方法很相似。本文中的示例使用用户窗体上的控件。 回到顶
2、端如何使用一个输入框和 AddItem 方法功能来填充列表框注： 也可使用本示例用在组合框。 若要通过使用输入的框和 AddItem 方法填充 列表框 控件，请按照下列步骤操作： 1. 为 Mac.在 Excel 中创建一个新的工作簿 2. 按选项 + F11 可启动 Visual Basic 编辑器。 3. 在 插入 菜单上单击 用户窗体。 4. 创建 列表框 控件和用户窗体上的两个 命令按钮 控件。 5. 请选择第一个命令按钮。按 F6 可查看属性窗口。在 标题 属性框中键入 输入新项。 6. 请选择第二个命令按钮。按 F6 可查看属性窗口。在 $ 标题 中键入 关闭 属性框中。7. 双击
3、用户窗体。用户窗体在代码窗口会显示。 8. 键入下列代码： 9. Private Sub CommandButton1_Click()10. Dim x As Variant11.12. x = InputBox _13. (“Type Data To Be Placed Into The ListBox and Click OK“)14.15. ListBox1.AddItem x16. End Sub17.18. Private Sub CommandButton2_Click()19. Close the UserForm.20. Unload Me21. End Sub22. 在 运行
4、 菜单上单击 运行子过程/用户窗体 运行在用户窗体。 23. 单击 输入新项。在出现的输入框中键入 测试。单击 确定。 测试 将添加到用户窗体上列表框中的列表中。单击关闭用户窗体的 关闭。 回到顶端若要将项添加到组合框中使用列属性注： 也可使用此示例使用列表框。 若要填充组合框使用 Column 属性，请按照下列步骤操作： 1. 为 Mac，启动 Excel 并创建一个新的工作簿。 2. 在新工作簿的 Sheet1 中键入以下数据： 3. A1: Apples4. A2: Pears5. A3: Bananas6. 按选项 + F11 可启动 Visual Basic 编辑器。 7. 在 插入
5、 菜单上单击 用户窗体。 8. 创建一个 组合框 控件和用户窗体上的两个 命令按钮 控件。 9. 请选择第一个命令按钮。按 F6 可查看属性窗口。在 $ 标题 中键入 输入数据 属性框中。 10. 请选择第二个命令按钮。按 F6 可查看属性窗口。在 $ 标题 中键入 关闭 属性框中。11. 双击用户窗体。用户窗体在代码窗口会显示。 12. 键入下列代码： 13. Private Sub CommandButton1_Click()14. Dim MyArray(0, 2) As String15.16. MyArray(0, 0) = Worksheets(1).Range(“A1“).Val
6、ue17. MyArray(0, 1) = Worksheets(1).Range(“A2“).Value18. MyArray(0, 2) = Worksheets(1).Range(“A3“).Value19.20. ComboBox1.Column() = MyArray21. End Sub22.23. Private Sub CommandButton2_Click()24. Close the UserForm.25. Unload Me26. End Sub27. 在 运行 菜单上单击 运行子过程/用户窗体 运行在用户窗体。 28. 当用户窗体出现时，单击 输入数据。 29. 单
7、击组合框的下拉箭头。 您现在可以在组合框中选择 苹果、 ，或 香蕉。单击关闭用户窗体的 关闭。 回到顶端参考 有关在 Visual Basic 编辑器中的用户窗体的详细信息单击 Office 助手，键入 用户窗体，然后单击 搜索 以查看返回的主题。 回到顶端这篇文章中的信息适用于:回到顶端关键字： kbmt kbhowto kbprogramming KB185388 KbMtzh回到顶端机器翻译 注意：这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇，语法或文法的问题，就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量，但是我们不保证机器翻译的正确度，也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。
