[ Φόρμες ] Βοήθεια στην σύνταξη κώδικα για combo box σε φόρμα.

[kapetang]

Καλημέρα

Ίρις, στη ΒΔ που επισυνάπτω προσπάθησα να προσομοιώσω αυτό που ζητάς.
Περιέχει μία φόρμα με ένα σύνθετο πλαίσιο στο οποίο επιλέγουμε τον ατμοσφαιρικό ρύπο και ένα πλαίσιο λίστας όπου εμφανίζονται τα στοιχεία του επιλεγμένου ρύπου με τη βοήθεια του αντίστοιχου ερωτήματος.
Δεν ξέρω, αν είναι αυτό που ζητάς, αφού δεν ανέβασες κάποιο δείγμα της βάσης σου.
Η λειτουργία της φόρμας βασίζεται στον παρακάτω κώδικα.

Private Sub cboFilter_AfterUpdate()
    Select Case Me!cboFilter
        Case 1
            Me!lstRipon.RowSource = "qrySO2"
        Case 2
            Me!lstRipon.RowSource = "qryCO"
        Case 3
            Me!lstRipon.RowSource = "qryNO2"
        Case 4
            Me!lstRipon.RowSource = "qryO3"
    End Select
        
End Sub

Φιλικά/Γιώργος