הפונקציה Environ

חשוב: מאמר זה תורגם בתרגום מכונה, ראה כתב ויתור. תוכל למצוא את הגרסה באנגלית של המאמר כאן לעיונך.

הערה: הפונקציה, שיטת, אובייקט או מאפיין המתוארים בנושא זה אינה זמינה אם שירות Microsoft Jet ביטוי פועל במצב ארגז חול, המונעת להערכה של ביטויים העשויים להיות לא בטוחים. לקבלת מידע נוסף אודות מצב ארגז חול, חפש "מצב sandbox" בעזרה.

החזרת מחרוזת המשויך משתנה סביבה של מערכת ההפעלה. לא זמין ב- Macintosh

תחביר

Environ ( { envstring | מספר } )

תחביר הפונקציה Environ כולל את הארגומנטים הבאים:

ארגומנט

תיאור

envstring

אופציונלי. ביטוי מחרוזת המכיל את השם של משתנה סביבה.

מספר

אופציונלי. ביטוי מספרי התואם לסדר המספרי של מחרוזת הסביבה בטבלה מחרוזת הסביבה. הארגומנט number יכול להיות כל ביטוי מספרי, אך הוא מעוגל למספר שלם לפני המספר מוערך.


הערות

אם לא ניתן למצוא את envstring בטבלה מחרוזת הסביבה, מחרוזת באורך אפס ("") מוחזר. אחרת, Environ מחזירה את הטקסט שהוקצו שצוין envstring; כלומר, הטקסט שלאחר השוויון סימן (=) בטבלה מחרוזת הסביבה עבור אותו משתנה סביבה.

אם תציין מספר, מוחזרת המחרוזת שנמצאת באותו מיקום מספרי בטבלה מחרוזת הסביבה. במקרה זה, Environ מחזירה את כל הטקסט, לרבות envstring. אם במיקום שצוין אין מחרוזת סביבה, Environ מחזירה מחרוזת באורך אפס.

דוגמה

הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications‏ (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.

דוגמה זו משתמשת בפונקציה Environ כדי לספק את מספר הערך ואורך המשפט 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

הערה: כתב ויתור בנוגע לתרגום מכונה: מאמר זה תורגם על-ידי מערכת מחשב, ללא התערבות אדם. Microsoft מציעה את תרגומי המכונה כדי לסייע למשתמשים שאינם דוברי אנגלית ליהנות מתוכן בנושא מוצרים, שירותים וטכנולוגיות של Microsoft. מכיוון שהמאמר תורגם על-ידי מכונה, הוא עלול להכיל שגיאות באוצר המילים, בתחביר או בדקדוק.

הרחב את הכישורים שלך
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider

האם מידע זה היה שימושי?

תודה על המשוב!

תודה על המשוב! נראה שכדאי לקשר אותך לאחד מנציגי התמיכה של Office.

×