Ισχύει για
| Αντικείμενο Screen |
|---|
Μπορείτε να χρησιμοποιήσετε την ιδιότητα ActiveForm μαζί με το αντικείμενο Screen για να προσδιορίσετε ή να παραπέμψετε στη φόρμα που έχει την εστίαση. Αντικείμενο Form, μόνο για ανάγνωση.
παράσταση.ActiveForm
Έκφραση Απαιτείται. Μια παράσταση που επιστρέφει ένα από τα αντικείμενα της λίστας "Ισχύει για".
Ρύθμιση
Αυτή η ρύθμιση ιδιότητας περιέχει μια αναφορά στο αντικείμενο φόρμας που έχει την εστίαση κατά την εκτέλεση.
Αυτή η ιδιότητα είναι διαθέσιμη χρησιμοποιώντας μια μακροεντολή ή κώδικα Visual Basic for Applications (VBA) και είναι μόνο για ανάγνωση σε όλες τις προβολές.
Παρατηρήσεις
Μπορείτε να χρησιμοποιήσετε την ιδιότητα ActiveForm για να κάνετε παραπομπή σε μια ενεργή φόρμα μαζί με μία από τις ιδιότητες ή τις μεθόδους της. Το ακόλουθο παράδειγμα εμφανίζει τη ρύθμιση ιδιότητας Name της ενεργής φόρμας.
Dim frmCurrentForm As Form
Set frmCurrentForm = Screen.ActiveForm
MsgBox "Current form is " & frmCurrentForm.Name
Εάν μια δευτερεύουσα φόρμα έχει την εστίαση, η ActiveForm αναφέρεται στην κύρια φόρμα. Εάν δεν υπάρχει ή δευτερεύουσα φόρμα έχει την εστίαση κατά τη χρήση του το ActiveForm ιδιότητα, εμφανίζεται ένα μήνυμα σφάλματος.