Prisijunkite prie „Microsoft“
Prisijunkite arba sukurkite paskyrą.
Sveiki,
Pasirinkti kitą paskyrą.
Turite kelias paskyras
Pasirinkite paskyrą, kurią naudodami norite prisijungti.

Pastaba: Šioje temoje aprašyta funkcija, metodas, objektas arba ypatybė yra išjungta, jei "Microsoft Jet Expression Service" veikia smėlio dėžės režimu, kuris neleidžia įvertinti galimai nesaugių reiškinių. Jei reikia daugiau informacijos apie smėlio dėžės režimą, žinyne ieškokite "smėlio dėžės režimas".

Pateikia sveikasis skaičius , nurodantis failo, katalogo arba aplanko atributus.

Sintaksė

GetAttr ( kelio pavadinimas )

Būtinas pathnameargumentas yra eilutės išraiška, nurodantis failo vardą. Kelio pavadinimas gali apimti katalogą arba aplanką ir diską.

Pateikti reikšmes

GetAttr grąžinta reikšmė yra šių atributų reikšmių suma:

Konstanta

Reikšmė

Aprašas

vbNormalus

0

Normalus.

vbReadOnly

1

Tik skaitoma.

vbHidden

2

Paslėptų.

vbSystem

4

Sistemos failas. Negalima naudoti Macintosh.

vbDirectory

16

Katalogas arba aplankas.

vbArchive

32

Po paskutinės atsarginės kopijos failas pasikeitė. Negalima naudoti Macintosh.

vbAlias

64

Nurodytas failo vardas yra pseudonimas. Galima tik Macintosh.


Pastaba: Šias konstantas nurodo "Visual Basic for Applications". Pavadinimus galima naudoti bet kurioje kodo vietoje faktinių reikšmių.

Pastabos

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Norėdami nustatyti, kurie atributai yra nustatyti, naudokite operatorių And , kad atliktumėte lyginimas pabičiui funkcijos GetAttr grąžinamos reikšmės ir norimo atskiro failo atributo reikšmę. Jei rezultatas nėra nulis, tas atributas nustatomas įvardytam failui. Pavyzdžiui, reiškinio And grąžinama reikšmė yra nulis, jei nenustatytas atributas Archive:

Result = GetAttr(FName) And vbArchive

Jei nustatyta atributo Archive reikšmė, grąžinama nenustatyta reikšmė.

Pavyzdys

Šiame pavyzdyje naudojama funkcija GetAttr , kad būtų nustatyti failo ir katalogo arba aplanko atributai. Macintosh galima naudoti tik konstantas vbNormal, vbReadOnly, vbHidden ir vbAlias.

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.

Reikia daugiau pagalbos?

Norite daugiau parinkčių?

Sužinokite apie prenumeratos pranašumus, peržiūrėkite mokymo kursus, sužinokite, kaip apsaugoti savo įrenginį ir kt.

Bendruomenės padeda užduoti klausimus ir į juos atsakyti, pateikti atsiliepimų ir išgirsti iš ekspertų, turinčių daug žinių.

Ar ši informacija buvo naudinga?

Ar esate patenkinti kalbos kokybe?
Kas turėjo įtakos jūsų įspūdžiams?
Paspaudus mygtuką Pateikti, jūsų atsiliepimai bus naudojami tobulinant „Microsoft“ produktus ir paslaugas. Jūsų IT administratorius galės rinkti šiuos duomenis. Privatumo patvirtinimas.

Dėkojame už jūsų atsiliepimą!

×