Office中国论坛/Access中国论坛

标题: 朱亦文,Environ("USERNAME")无效果,搞笑了点吧! [打印本页]

作者: 大熊 时间: 2003-9-25 06:06
标题: 朱亦文,Environ("USERNAME")无效果,搞笑了点吧!
操作系统环境 Environ 函数

您是第 72 读者

作者：朱亦文
发布日期：2003年8月13日
摘要：灵活运用这个VBA函数, 求取机器名、WINDOWS目录等

正文：

Environ 函数

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

语法

Environ({envstring | number})

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

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

说明

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

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

例子：

一、求机器名
Environ("COMPUTERNAME")

二、求当前登录用户的用户名
Environ("USERNAME")

三、求WINDOWS目录
Environ("windir")

四、求操作系统
Environ("OS")

五、求临时目录
Environ("TEMP") 或 Environ("TMP")

来源于：本站原创

作者: zhuyiwen 时间: 2003-9-25 06:23
可能与操作系统有关,这些都是在WINDOWS 2000测试的结果

作者: 大熊 时间: 2003-9-25 06:54
唉,写得时候您就多费神了!要为像我一样的大草包们考虑考虑!

作者: zhuyiwen 时间: 2003-9-25 07:09
大熊,你就别笑话我罗,呵呵

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)