Συνάρτηση FileAttr

Σημείωση: Θέλουμε να σας παρέχουμε το πιο πρόσφατο περιεχόμενο βοήθειας στη γλώσσα σας όσο πιο σύντομα γίνεται. Αυτή η σελίδα έχω μεταφραστεί μέσω αυτοματοποιημένης διαδικασίας και ενδεχομένως να περιέχει γραμματικά λάθη και ανακρίβειες. Ο σκοπός μας είναι αυτό το περιεχόμενο να σας φανεί χρήσιμο. Μπορείτε να μας ενημερώσετε στο κάτω μέρος αυτής της σελίδας εάν οι πληροφορίες σάς φάνηκαν χρήσιμες; Εδώ θα βρείτε το άρθρο στα Αγγλικά, για να το συμβουλεύεστε εύκολα.

Σημείωση: Η συνάρτηση, τη μέθοδο, αντικείμενο ή ιδιότητα που περιγράφονται σε αυτό το θέμα είναι απενεργοποιημένη, εάν η Microsoft Jet Expression Service εκτελείται σε λειτουργία φίλτρου, η οποία δεν επιτρέπει την αξιολόγηση της ενδεχομένως μη ασφαλών παραστάσεων. Για περισσότερες πληροφορίες σχετικά με τη λειτουργία sandbox, κάντε αναζήτηση για "η λειτουργία φίλτρου" στη Βοήθεια.

Επιστρέφει έναν ακέραιο μεγάλου μήκους που αντιπροσωπεύει τη λειτουργία αρχείου για αρχεία που έχουν ανοιχτεί χρησιμοποιώντας την εντολή Άνοιγμα .

Σύνταξη

FileAttr ( αριθμός_αρχείου , τύπος_επιστροφής )

Η σύνταξη της συνάρτησης FileAttr περιλαμβάνει τα παρακάτω ορίσματα:

Όρισμα

Περιγραφή

αριθμός_αρχείου

Απαιτείται. Ακέραιος αριθμός. Οποιαδήποτε έγκυρη αριθμός αρχείου.

τύπος_επιστροφής

Απαιτείται. Ακέραιος αριθμός. Αριθμός που υποδεικνύει τον τύπο των πληροφοριών για να επιστρέψει. Καθορίστε 1 για να επιστρέψει μια τιμή που υποδεικνύει την κατάσταση του αρχείου. 16 bit μόνο σε συστήματα, καθορίστε 2 για να ανακτήσετε μια λαβή λειτουργικό σύστημα αρχείων. τύπος_επιστροφής 2 δεν υποστηρίζεται σε συστήματα 32-bit και προκαλεί σφάλμα.

Επιστροφή τιμών

Όταν το τύπος_επιστροφήςόρισμα είναι 1, τις παρακάτω τιμές επιστροφής υποδεικνύουν τη λειτουργία πρόσβασης αρχείου:

Λειτουργία

Τιμή

Εισαγωγή δεδομένων

1

Εξόδου

2

Τυχαία

4

Προσάρτησης

8

Δυαδικός

32

Παράδειγμα

Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε ένα έργο Visual Basic για τη λειτουργική μονάδα Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στο στοιχείο Αναζήτηση και πληκτρολογήστε μία ή περισσότερες όρων στο πλαίσιο αναζήτησης.

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση FileAttr για να επιστρέψετε τη λαβή λειτουργία και αρχείο αρχείο από ένα ανοιχτό αρχείο. Επιστρέφει τη λαβή αρχείο μόνο σε συστήματα 16 bit; στα συστήματα 32-bit, η τιμή 2 ως δεύτερο όρισμα δημιουργεί ένα μήνυμα σφάλματος.

Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.
Αναπτύξτε τις δεξιότητές σας στο Office
Εξερευνήστε το περιεχόμενο της εκπαίδευσης
Αποκτήστε πρώτοι τις νέες δυνατότητες
Γίνετε μέλος του Office Insider

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

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

Σας ευχαριστούμε για τα σχόλιά σας! Φαίνεται ότι μπορεί να είναι χρήσιμο να συνδεθείτε με έναν από τους συνεργάτες υποστήριξης του Office.

×