Funkcija FileAttr

Svarīgi!:  Šis raksts ir mašīntulkots, skatiet atrunu. Lūdzu, skatiet šī raksta versiju angļu valodā šeit jūsu informācijai.

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ž Long, kas norāda faila režīmu failiem, kas atvērti, izmantojot Open priekšrakstu.

Sintakse

FileAttr ( faila_numurs , Atgrieztais_tips )

FileAttr sintaksē ir šādi argumenti:

Arguments

Apraksts

faila_numurs

Obligāts. Vesels skaitlis. Jebkuru derīgu faila numurs.

Atgrieztais_tips

Obligāts. Vesels skaitlis. Skaitli, kas norāda informācijas tipu, lai atgrieztu. Norādiet 1, lai atgrieztu vērtību, kas norāda faila režīmu. 16 bitu sistēmām, norādītu 2. darbību, lai izgūtu operētājsistēmas faila turi. Atgrieztais_tips 2 netiek atbalstīts 32 bitu sistēmās un izraisa kļūdu.

Atgriež vērtības

Kad Atgrieztais_tipsarguments ir 1, šajos piemēros tiek atgriezts vērtības norāda failu piekļuves režīmu:

Režīms

Vērtība

Ievade

1

Izvades

2.

Izlases

4

Pievienot

8

Binārs

32

Piemērs.

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.

Šajā piemērā funkcija FileAttr , lai atgrieztu atvērt failu faila režīmu un faila turi. Faila turis tiek atgriezts tikai 16 bitu sistēmām; 32 bitu sistēmām, iet kā otrais arguments 2, radīsies kļūda.

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.

Piezīme.: Mašīntulkošanas atruna. Šo rakstu ir tulkojusi datorsistēma bez cilvēka iejaukšanās. Microsoft piedāvā šos mašīntulkojumus, lai palīdzētu angliski nerunājošajiem lietotājiem izmanot saturu par Microsoft produktiem, pakalpojumiem un tehnoloģijām. Tā kā šis raksts ir mašīntulkots, tajā var būt leksikas, sintakses un gramatikas kļūdas.

Paplašiniet savas 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.

×