VB获取系统目录的简单方法

Private Sub Command1_Click()

Dim File As String

File = Environ$("windir") & "\system32"

Print File

End Sub

其实Environ()完全可以达到获取系统目录的效果

Environ 函数

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

语法

Environ({envstring | number})

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

部分 描述

envstring 可选参数。包含一个环境变量名的字符串表达式。

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