无法让级联组合框工作

Can't get the cascading combo boxes to work

我正在尝试制作级联组合框,但我似乎无法让它工作。例如,如果我在第一个组合框中 select 一台特定的计算机,那么第二个组合框应该只显示与该计算机兼容的 HDD。我还为我创建的数据库提供了一个 link。谁能帮我解决这个问题?

我有 2 个表的字段:

cboxComputer 行来源: SELECT tblComputer.Computer 来自 tblComputer;

cboxHDD 行来源: SELECT tblHDD.HDD,tblHDD.Computer 来自 tblHDD;

Private Sub cboxComputer_AfterUpdate()
    Me.cboxHDD.RowSource = "SELECT HDD " & _
                           "FROM tblHDD " & _
                           "WHERE Computer = " & Nz(Me.cboxComputer) & _
                           "ORDER BY HDD"
End Sub

https://drive.google.com/file/d/0Bye-M8FI1tRURmQ0MEFzRjBCdWM/view?usp=sharing

数据库中的计算机字段是字符串数据类型。尝试像这样在名称周围加上撇号:

Private Sub cboxComputer_AfterUpdate()
    Me.cboxHDD.RowSource = "SELECT HDD " & _
                       "FROM tblHDD " & _
                       "WHERE Computer = '" & Nz(Me.cboxComputer) & "' " & _
                       "ORDER BY HDD"
End Sub