如何在多次选择时连接组合框？

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'属性修改为您需要的值。