Environ 函数取得系统参数

Environ 函数

返回 String，它关连于一个操作系统环境变量。 在 Macintosh 中不可用

语法

Environ({envstring | number})

Environ 函数的语法含有以下这些命名参数：

部分	描述
envstring	可选参数。包含一个环境变量名的字符串表达式。
number	可选参数。数值表达式，用来表示环境字符串在环境字符串表格中的数值顺序。number 参数可以是任意的数值表达式，不过在计算前，它会先转换为一个整数。

说明

如果在环境字符串表格中找不到 envstring，则会返回一个零长度字符串 ("")。如果找到，则 Environ 会返回一段文本，文本是赋值给指定的 envstring 的，也就是说，在环境字符串表格中对应那个环境变量的等号 (=) 后面的那段文本。

如果指定了 number，则在环境字符串表格中相应位置上的字符串会返回。在这种情况下，Environ 会返回整个文本，包括 envstring。如果在指定位置上没有环境字符串，那么 Environ 会返回一个零长度字符串。

参数对照：（在本机测试结果如下）

 

number	envstring
1	ALLUSERSPROFILE
2	APPDATA
3	CLIENTNAME
4	CommonProgramFiles
5	COMPUTERNAME
6	ComSpec
7	FP_NO_HOST_CHECK
8	HOMEDRIVE
9	HOMEPATH
10	LOGONSERVER
11	NUMBER_OF_PROCESSORS
12	OS
13	Path
14	PATHEXT
15	PROCESSOR_ARCHITECTURE
16	PROCESSOR_IDENTIFIER
17	PROCESSOR_LEVEL
18	PROCESSOR_REVISION
19	ProgramFiles
20	SESSIONNAME
21	SystemDrive
22	SystemRoot
23	TEMP
24	TMP
25	USERDOMAIN
26	USERNAME
27	USERPROFILE
28	windir

 

============================================================================

For i = 1 To 28
    Debug.Print Environ(i)
Next i

1  ALLUSERSPROFILE=C:/Documents and Settings/All Users
2  APPDATA=C:/Documents and Settings/Tnss/Application Data
3  CLIENTNAME=Console
4  CommonProgramFiles=C:/Program Files/Common Files
5  COMPUTERNAME=TNS
6  ComSpec=C:/WINDOWS/system32/cmd.exe
7  FP_NO_HOST_CHECK=NO
8  HOMEDRIVE=C:
9  HOMEPATH=/Documents and Settings/Tnss
10  LOGONSERVER=//TNS
11  NUMBER_OF_PROCESSORS=1
12  OS=Windows_NT
13  Path=C:/WINDOWS/system32;C:/WINDOWS;C:/WINDOWS/System32/Wbem
14  PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH
15  PROCESSOR_ARCHITECTURE=x86
16  PROCESSOR_IDENTIFIER=x86 Family 15 Model 1 Stepping 2, GenuineIntel
17  PROCESSOR_LEVEL=15
18  PROCESSOR_REVISION=0102
19  ProgramFiles=C:/Program Files
20  SESSIONNAME=Console
21  SystemDrive=C:
22  SystemRoot=C:/WINDOWS
23  TEMP=C:/DOCUME~1/Tnss/LOCALS~1/Temp
24  TMP=C:/DOCUME~1/Tnss/LOCALS~1/Temp
25  USERDOMAIN=TNS
26  USERNAME=Tnss
27  USERPROFILE=C:/Documents and Settings/Tnss
28  windir=C:/WINDOWS