
02-11-15, 00:29
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 22-11-2011 Περιοχή: Αθήνα
Μηνύματα: 2.321
| |
Δεν μας ανέβασες ένα παράδειγμα, οπότε θα πάμε θεωρητικά, χωρίς να ξέρουμε
ακριβώς πίνακες ή φόρμες, σχέσεις κλπ Τι θα πρέπει να γίνει:
Βάλε, στην κύρια φόρμα ένα combo και ανάλογα με το όχημα που θα επιλέγεις,
να φιλτράρεται η υποφόρμα. Αυτό προϋποθέτει
Στο combo αυτό...
(ιδιότητες > δεδομένα > row sourse )
ένα ερώτημα sql μορφής
SELECT tbl_οχήματα.ID, tbl_οχήματα.αριθμόςΚυκλ FROM tbl_οχήματα ORDER BY tbl_οχήματα.αριθμόςΚυκλ;
και στο event > after update του combo
ένα κώδικα μορφής
Private Sub cboSdisplay_AfterUpdate()
With Me!sub_οχήματα.Form
.Filter = "[αριθμόςΚυκλ] = " & Me!cboSdisplay.Value
.FilterOn = True
End With
End Sub
όπου sub_οχήματα.Form η υποφόρμα και
Me!cboSdisplay το combo
|