My.Application.GetEnvironmentVariable 方法

2008-08-18

更新：2007 年 11 月

返回指定环境变量的值。

' Usage
Dim value As String = My.Application.GetEnvironmentVariable(name)
' Declaration
Public Function GetEnvironmentVariable( _
   ByVal name As String _
) As String

参数

name
包含环境变量名称的 String。

返回值

包含环境变量（名称为 name）的值的 String。

异常

下面的情况可能会导致异常：

name 参数为 Nothing (ArgumentNullException)。
name 指定的环境变量不存在 (ArgumentException)。
调用代码没有访问权限为 Read 的 EnvironmentPermission (SecurityException)。

备注

My.Application.GetEnvironmentVariable 方法返回名称为 name 的环境变量。此方法类似于 Environment.GetEnvironmentVariable(String)，只是如果 name 指定的环境变量不存在，此方法将引发异常。

示例

此示例使用 My.Application.GetEnvironmentVariable 方法来获取并显示 PATH 环境变量（如果有）的值。否则，它将显示一条消息，指明 PATH 环境变量不存在。

Private Sub TestGetEnvironmentVariable()
    Try
        MsgBox("PATH = " & My.Application.GetEnvironmentVariable("PATH"))
    Catch ex As System.ArgumentException
        MsgBox("Environment variable 'PATH' does not exist.")
    End Try
End Sub