別のフィールドの数値以下の数値を含むドロップダウンボックスを作成します。

Question

異なる書籍の複数のコピーを持つライブラリのAccess 2013でデータベースを作成しています。書籍が発行されたときに、図書館員がドロップダウンで次に低い値を選択できるように、ブックの使用可能なコピーの総数以下の数を表示するコンボボックス/参照リストを作成したいとします。 （使用可能なコピーの数が1つ減少します）。図書館がより人気のある書籍をより多く購入すると、購入したコピーの数が変わる可能性があります。そのため、ドロップダウンボックスは動的に更新する必要があります。これはどうすればいいですか？私は交換が必要ですか？

Answer 1

まず、コンボボックスのRowSourceType Propertyを "値リスト"に設定して、コンボボックスリストを手動で管理することを決定します。 ComboboxのAddItem methodメソッドを使用してアイテムを追加し、RemoveItem Methodを使用してアイテムを削除します。 、現在のすべての項目を削除した後

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 

ラン提示各書籍のレコードのこのコードを使用すると、すべての項目を削除する方法This isおそらく、フォームのOnCurrentイベントで発生します。