Εμφάνιση ενός μόνο μηνύματος
  #4  
Παλιά 17-07-10, 12:13
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos δεν είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.035
Προεπιλογή

Γιώρο, τη γραμμή:
DoCmd.OpenForm "όνομα της φόρμας ", acNormal, , , , acDialog, Nz(τιμή που θα μεταφερθεί στη φόρμα που θα ανοιχτεί, vbNullString)

Θα πρέπει να μπει στο συμβάν κλικ του κάθε κουμπιού που θα ανοίγει κάποια φόρμα.

Επίσης αν δεν δώσεις μια τιμή στο όρισμα OpenArgs πχ.την τιμή ενός πεδίου της φόρμας δεν πρόκειται να συμβεί κάτι.

Η φόρμα pinakas δηλαδή, θα πρέπει να περιέχει ένα μη κενό πεδίο που θα το τοποθετήσεις στο τελευταίο όρισμα στον παραπάνω κώδικα.
Κάθε φόρμα που ανοίγει με τη χρήση του παραπάνω κώδικα θα πρέπει μέσα από το συμβάν OnLoad() να ελέγχει αν υπάρχει κάποια τιμή στην ιδιότητα OpenArgs για να τη αποθηκεύσει σε κάποιο πεδίο ή γενικά να κάνει κάτι μ αυτή την πληροφορία.
Τα λέμε πάλι
Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση