vba - una - cuadros combinados en cascada access 2016

No se puede hacer que los cuadros combinados en cascada funcionen

Question

Estoy tratando de crear cuadros combinados en cascada, pero parece que no puedo hacer que funcione. Por ejemplo, si selecciono una computadora específica en el primer cuadro combinado, entonces el segundo cuadro combinado solo debe mostrar la unidad de disco duro que es compatible con esa computadora. También proporcioné un enlace a la base de datos que he creado. ¿Puede alguien ayudarme con esto?

Tengo 2 tablas con los campos:

• tblComputer (Computadora)
• tblHDD (HDD, computadora)

Fuente cboxComputer Row: SELECT tblComputer.Computer FROM tblComputer;

Fuente cboxHDD Row: SELECCIONE tblHDD.HDD, tblHDD.Computer FROM 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

Answer 1

El campo Computadora de la base de datos es un tipo de datos de cadena. Intenta poner apóstrofes alrededor del nombre así:

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