Funkcija GetAttr

Piezīme.: Mēs vēlamies sniegt jums visjaunāko palīdzības saturu jūsu valodā, cik vien ātri to varam. Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai lapas lejasdaļā varat mums pavēstīt, vai informācija jums noderēja? Ērtai atsaucei šeit ir šis raksts angļu valodā.

Piezīme.: Funkcija, metodi, objektu vai rekvizītu, kas aprakstīts šajā tēmā ir atspējots, ja Microsoft Jet Expression Service ir atvērta smilškastes režīmu, kas neļauj iespējami nedrošās izteiksmes novērtēšanas. Lai iegūtu papildinformāciju par smilškastes režīmu, meklējiet "smilškastes režīma" palīdzībā.

Atgriež skaitlim , kas norāda faila, direktorija vai mapes atribūtus.

Sintakse

GetAttr ( ceļa nosaukums )

Nepieciešama ceļuarguments ir virknes izteiksme , kas norāda faila nosaukumu. Ceļa nosaukums var ietvert direktoriju vai mapi un disku.

Atgriež vērtības

GetAttr atgrieztās vērtības ir šādas atribūtu vērtības summa:

Konstante

Vērtība

Apraksts

vbNormal

0

Parasts.

vbReadOnly

1

Tikai lasāmi.

vbHidden

2

Paslēptas.

vbSystem

4

Sistēmas fails. Nav pieejams operētājsistēmā Macintosh datorā.

vbDirectory

16

Direktorija vai mapes.

vbArchive

32

Failā ir veiktas izmaiņas pēc pēdējās dublējumkopijas. Nav pieejams operētājsistēmā Macintosh datorā.

vbAlias

64

Norādītais faila nosaukums ir aizstājvārds. Pieejams tikai Macintosh datorā.


Piezīme.: Šīs konstantes norāda Visual Basic for Applications. Nosaukumus var izmantot jebkur kodā reālo vērtību vietā.

Piezīmes

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Lai noteiktu, kuri atribūti ir iestatīti, izmantot un operatoru, lai veiktu salīdzināšana bitu līmenī vērtības atgrieza funkcija GetAttr un vēlaties atsevišķā faila atribūta vērtību. Ja rezultāts nav nulle, šis atribūts ir iestatīts faila nosaukumu. Piemēram, tālāk norādīto izteiksmi un atgrieztā vērtība ir nulle, ja nav iestatīts arhīva atribūts:

Result = GetAttr(FName) And vbArchive

Tiek atgriezta vērtība, kas nav nulle, ja ir iestatīts arhīva atribūts.

Piemērs

Šajā piemērā funkcija GetAttr , lai noteiktu faila un direktorija vai mapes atribūtus. Macintosh datorā, tikai konstantes vbNormal, vbReadOnly, vbHidden un vbAlias ir pieejami.

Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.
Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta aģentiem.

×