Функция Environ

Забележка: Бихме искали да ви осигурим най-новото помощно съдържание възможно най-бързо на вашия собствен език. Тази страница е преведена чрез автоматизация и може да съдържа граматически грешки и несъответствия. Нашата цел е това съдържание да ви бъде полезно. Можете ли да ни кажете дали информацията е била полезна за вас, в дъното на тази страница? Ето статията на английски за бърза справка.

Забележка: Функция, метод, обект или свойство, описани в тази тема е забранено, ако Microsoft Jet Expression Service се изпълнява в ограничителен режим, който не позволява на оценката на потенциално опасни изрази. За повече информация за ограничителен режим потърсете "ограничителен режим" в "Помощ".

Връща низ , свързани с променливата на средата на операционната система. Не е наличен на Macintosh

Синтаксис

Среда ( { envstring | номер } )

Синтаксисът на функцията околната има следните аргументи:

Аргумент

Описание

envstring

По желание. Низов израз, съдържащ името на променливата на средата.

число

По желание. Числов израз, съответстващо на цифров ред на среда низ в таблицата по средата на низ. Аргументът число може да бъде всеки числов израз, но се закръглява до цяло число, преди да се оценява.


Забележки

Ако envstring не може да бъде намерен в таблицата по средата на низ, низ с нулева дължина ("") се връща. В противен случай околната връща текста, зададени за зададения envstring; Това е текстът след равенство влезте (=) в таблицата по средата на низ за тази среда променлива.

Ако укажете число, връща се низ, че числова позиция в таблицата по средата на низ. В този случай Environ връща целия текст, включително envstring. Ако няма среда низ в указаната позиция, околната Връща низ с нулева дължина.

Пример

Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко израза в полето за търсене.

Този пример използва функцията среда за доставка на номер на запис и продължителността на отчета за PATH от таблицата по средата на низ. Не е налично в Macintosh.

Dim EnvString, Indx, Msg, PathLen    ' Declare variables.
Indx = 1 ' Initialize index to 1.
Do
' Get environment variable.
EnvString = Environ(Indx)
' Check PATH entry.
If Left(EnvString, 5) = "PATH=" Then
' Get length.
PathLen = Len(Environ("PATH"))
Msg = "PATH entry = " & Indx & " and length = " _
& PathLen
Exit Do
Else
' Not PATH entry, so increment.
Indx = Indx + 1
End If
Loop Until EnvString = ""
If PathLen > 0 Then
' Display message.
MsgBox Msg
Else
MsgBox "No PATH environment variable exists."
End If
Разширете уменията си в Office
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×