Μετάβαση στο κύριο περιεχόμενο
Υποστήριξη
Είσοδος με Microsoft
Είσοδος ή δημιουργία λογαριασμού.
Γεια σας,
Επιλέξτε διαφορετικό λογαριασμό.
Έχετε πολλούς λογαριασμούς
Επιλέξτε τον λογαριασμό με τον οποίο θέλετε να εισέλθετε.

Ισχύει για

Αντικείμενο Form

Αντικείμενο Report

Μπορείτε να χρησιμοποιήσετε την ιδιότητα hWnd για να προσδιορίσετε τη λαβή (μια μοναδική τιμή ακέραιου μεγάλου μήκους) που έχει εκχωρηθεί από τα Microsoft Windows στο τρέχον παράθυρο. Aνάγνωσης/εγγραφής, Μεγάλου μήκους.

παράσταση.Hwnd

παράσταση Υποχρεωτικό. Μια παράσταση που επιστρέφει ένα από τα αντικείμενα της λίστας "Ισχύει για".

Παρατηρήσεις

Αυτή η ιδιότητα είναι διαθέσιμη μόνο όταν χρησιμοποιείται μια μακροεντολή ή κώδικας της Visual Basic for Applications (VBA).

Μπορείτε να χρησιμοποιήσετε αυτή την ιδιότητα σε κώδικα VBA, όταν πραγματοποιείτε κλήσεις σε λειτουργίες διασύνδεσης (API) προγραμματισμού εφαρμογών Windows ή άλλες εξωτερικές ρουτίνες που απαιτούν την ιδιότητα hWnd ως όρισμα. Πολλές λειτουργίες των Windows απαιτούν την τιμή της ιδιότητας hWnd του τρέχοντος παραθύρου ως ένα από τα ορίσματα.

Επειδή η τιμή αυτής της ιδιότητας μπορεί να αλλάξει κατά την εκτέλεση ενός προγράμματος, μην αποθηκεύεται την τιμή της ιδιότητας hWnd σε μια δημόσια μεταβλητή.

Παράδειγμα

Το παρακάτω παράδειγμα χρησιμοποιεί την ιδιότητα hWnd με τη συνάρτηση IsZoomed του API των Windows για να προσδιορίσει εάν ένα παράθυρο είναι μεγιστοποιημένο.

' Enter on single line in Declarations 
' section of Module window.
Declare Function IsZoomed Lib "user32" _
(ByVal hWnd As Long) As Long
Sub Form_Activate()
Dim intWindowHandle As Long
intWindowHandle = Screen.ActiveForm.hWnd
If Not IsZoomed(intWindowHandle) Then
DoCmd.Maximize
End If
End Sub

Χρειάζεστε περισσότερη βοήθεια;

Θέλετε περισσότερες επιλογές;

Εξερευνήστε τα πλεονεκτήματα της συνδρομής, περιηγηθείτε σε εκπαιδευτικά σεμινάρια, μάθετε πώς μπορείτε να προστατεύσετε τη συσκευή σας και πολλά άλλα.

Οι κοινότητες σάς βοηθούν να κάνετε και να απαντάτε σε ερωτήσεις, να δίνετε σχόλια και να ακούτε από ειδικούς με πλούσια γνώση.

Σας βοήθησαν αυτές οι πληροφορίες;

Πόσο ικανοποιημένοι είστε με τη γλωσσική ποιότητα;
Τι επηρέασε την εμπειρία σας;
Πατώντας "Υποβολή" τα σχόλια σας θα χρησιμοποιηθούν για τη βελτίωση των προϊόντων και των υπηρεσιών της Microsoft. Ο διαχειριστής IT θα έχει τη δυνατότητα να συλλέξει αυτά τα δεδομένα. Δήλωση προστασίας προσωπικών δεδομένων.

Σας ευχαριστούμε για τα σχόλιά σας!

×