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

Question

我正在尝试创建一个将一个组合框链接到另一个组合框的访问表单，以便在一个组合框中进行的选择决定了下一个组合框＆＃39;下拉菜单。这是我的代码：

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

End Sub

当下拉选项少于16时，我的代码才能成功运行。之后，我收到错误消息＆＃34; System Resources Exceeded＆＃34;。我假设我正在达到Access限制，但这似乎是一个非常简单的尝试和完成的任务。有没有人对我的错误和解决方法有任何想法？

谢谢。

Answer 1

修改＆＃39;列表行＆＃39;组合框的属性表上的属性，以满足您的需求。