单击按钮向组合框添加值

Question

我在表格和按钮中有一个组合框。 我想在点击时为组合框添加值。 例如： 在组合框中，存在1,2,3,4个值。我想在按一下按钮时添加5。

我不知道该怎么做。

Answer 1

双击按钮为click（）事件创建事件处理程序，然后将此代码放入事件处理程序中。将Combo1替换为组合名称。

Private Sub Command1_Click()

  Combo1.AddItem ("5")

End Sub

Answer 2

我喜欢使用查询或表格作为行来源 在这种情况下，我只需创建一个包含一列的表，并将其设置为组合框的行源。

现在我可以在运行时编辑表中的数据（删除一些值，插入新值，使用单个查询从其他表复制值...），当我完成时，我只是致电Combo1.Requery。

使用此解决方案，关闭并重新打开表单后，添加的值不会消失（甚至在关闭并重新打开Access！之后），因为这些值存储在Access数据库的表中。