创建一个下拉框，其中包含的数字等于或小于另一个字段中的数字

Question

我正在Access 2013中为具有多个不同书籍副本的库创建数据库。我想创建一个组合框/查找列表，显示等于或小于图书总可用副本的数字，以便在发布图书时，图书管理员可以在下拉列表中选择下一个最低值。 （可用副本数量减少一个）。购买的副本数量可能会随着图书馆购买更多热门图书的副本而发生变化，因此下拉框需要动态更新。我该怎么做呢？我需要重新种植吗？

Answer 1

首先将Combobox的RowSourceType Property设置为＆＃34;值列表＆＃34;，以确定要手动管理组合框列表。然后使用Combobox的AddItem method方法添加项目，使用RemoveItem Method删除项目。 This is如何删除所有项目：

For i = 1 To ListBox1.ListCount
   'Remove an item from the ListBox.
   ListBox1.RemoveItem 0
Next i

删除所有当前项目后，计算多少Available Copies，并将它们循环添加到列表中：

For i = 1 To AvailableCopies    
    'Add an item from the ListBox.
    ListBox1.AddItem i   
Next i

为每个呈现的图书记录运行此代码，可能是在表单的OnCurrent事件上。