Σταύρο, αφού εμφανίσεις την
κεφαλίδα/υποσέλιδο της φόρμας, και αφού εισάγεις το πεδίο
State (μπορεις να το αποκρύψεις),
πρόσθεσε ένα σύνθετο πλαίσιο στην κεφαλίδα της φόρμας με το όνομα
cboState που θα
περιέχει τις τιμές
HERE και
AWAY ή αν έχεις περισσότερες επιλογές, πάρε τις μοναδικές
τιμές από τον πίνακα σου βάζοντας στην προέλευση γραμμής:
SELECT DISTINCT tblPerson.State FROM tblPerson;
Κατόπιν, στο συμβάν
"Μετά την ενημέρωση" επίλεξε
[Διαδικασία συμβάντος],
κάνε στο κουμπί τέρμα δεξιά που εμφανίζεται στη γραμμή αυτή και στο παράθυρο που θα εμφανιστεί,
ανάμεσα στις 2 γραμμές:
Private Sub cboState_AfterUpdate()
End Sub
πέρασε τον παρακάτω κώδικα
:
Κώδικας:
If Nz(Me.cboState, vbNullString) = vbNullString Then
Me.FilterOn = False
Else
Me.Filter = "State = '" & Me.cboState & "'"
Me.FilterOn = True
End If
Έτσι, κάθε φορά που θα επιλέγεις μια τιμή από το σύνθετο πλαίσιο
η φόρμα σου θα φιλτράρεται ανάλογα.
Φιλικά
Τάσος