Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 29-07-15, 11:08
Το avatar του χρήστη Spirosgr
Spirosgr Ο χρήστης Spirosgr δεν είναι συνδεδεμένος
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού 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
Προεπιλογή

Το κουμπί στην κύρια φόρμα, «τρέχει» κάποια εντολή.
Επομένως, στο AfterUpdate του πεδίου υποφόρμας, θα «τρέχει» η ίδια εντολή.

Έχεις αυτό
Κώδικας:
Private Sub cmd1_Click()
    MsgBox "Σας ευχαριστώ πολύ", vbInformation, "Πάτησε με"
End Sub
Το μετατρέπεις σε
Κώδικας:
Private Sub cmd1_Click()
    test
End Sub
Σε μια module
Κώδικας:
Sub test()
    MsgBox "Σας ευχαριστώ πολύ", vbInformation, "Πάτησε με"
End Sub
Sto AfterUpdate του πεδίου
Κώδικας:
Private Sub Field1_AfterUpdate()
    test
End Sub
Έτσι click & update κάνουν την ίδια ενέργεια
Απάντηση με παράθεση