Αντιγραφή πεδίου υποφόρμας σε κύρια φόρμα

[Jim]

Έχω ένα προβληματάκι
Τι κώδικα θα πρέπει να γράψω για να μου βγάζει στο πεδίο [Ofili] τις φόρμας Enoikiastes το σύνολο του πεδίου [Poso] από την φόρμα Ofiles…. Και όταν τσεκάρω στο πεδίο [Exoflisi] τις φόρμας Ofiles να αφερή το ποσό τις αντιστοιχης σειράς και να κάνει αυτόματη ενημέρωση στο πεδίο [Ofili] τις φόρμας Enoikiastes επισυνάπτω συνημένω για να γίνω ποιο κατανοητός.Σάς ευχαριστώ.

[Tasos]

Δημήτρη καλημέρα!

Στο συμβάν AfterUpdate() της υποφόρμας Ofiles, βάλε το παρακάτω:

Private Sub Form_AfterUpdate()
    Me.Parent.Ofili = DSum("[Poso]", "Ofiles", "[Exoflisi]<>-1")
    Me.Parent.Refresh
End Sub

και στο συμβάν Click() του πλαισίου ελέγχου Exoflisi το παρακάτω:

Private Sub Exoflisi_Click()
    Form_AfterUpdate
End Sub

Φιλικά

Τάσος

[Jim]

Τάσο και πάλι ένα μεγάλο ευχαριστώ για την άμεση απάντηση και κατανόηση,
Δημήτρης