Je moet een stukje code schrijven bij de keuzelijst die je als eerste hebt genoemd.
Die code moet je plaatsen onder het OnClick event (de bij klikken gebeurtenis) van die keuzelijst.
Wat je daar moet doen is het SQL statement opbouwen die voor de tweede keuzelijst nodig is, dat statement bij de tweede keuzelijst plaatsen en vervolgens de tweede keuzelijst verversen.
De basis voor het SQL statement dat je nodig hebt kun je Jatten bij de tweede keuzelijst van de eigenschap rijbron.
De code onder het onclick event van de eerste keuzelijst moet er ongeveer als volgt uitzien:
Private Sub lstEersteLijst_Click()
Dim strSQL
strSQL = ""
strSQL = strSQL & "SELECT veld1, Veld2 " & vbCrLf
strSQL = strSQL & "FROM JouwTabel " & vbCrLf
strSQL = strSQL & "WHERE Veldx = " & cStr(me.lstEersteLijst) & vbCrLf
strSQL = strSQL & "ORDER BY veld1;"
Me.lstTweedeLijst.RowSource = strSQL
Me.lstTweedeLijst= Null
me.lstTweedeLijst.Requery
End Sub