如何在多次選擇時連接組合框？

Question

我正在嘗試創建一個Access窗體，將一個組合框鏈接到另一個組合框，以便在一個組合框中進行的選擇可確定下一個組合框的下拉框。這裏是我的代碼：

Private Sub Combo58_AfterUpdate() 

With Forms("UserForm").Combo60 
    If IsNull(Forms("UserForm").Combo58) Then 
     .RowSource = "" 
    Else 
     .RowSource = "SELECT DISTINCT [BusinessLvl2(Unit)Code] " & _ 
        "FROM HRBI " & _ 
        "WHERE [BusinessLvl1(Group)Code]=[Forms]![UserForm]![Combo58];" 
    End If 
    Call .Requery 
End With 

末次

我的代碼工作成功時，有不到16下拉選擇。之後，我收到錯誤消息「System Resources Exceeded」。我假設我遇到了Access限制，但是這似乎是一個非常簡單的任務，可以嘗試完成。有沒有人有任何想法我做錯了什麼和解決方法？

謝謝。

Answer 1

將組合框屬性表中的'list rows'屬性修改爲您需要的值。