• Home
 · 
• Windows API Call/Explanation
 · 
• Get Environment Variable using GetEnvironmentVariable using API

Get Environment Variable using GetEnvironmentVariable using API

Get Environment Variable using GetEnvironmentVariable using API

API Declarations


lpName As String, ByVal lpBuffer As String, ByVal nSize As Long) As Long





Rate Get Environment Variable using GetEnvironmentVariable using API

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim evar As String
Dim elen As Long
evar = String(256, " ")
elen = GetEnvironmentVariable("COMSPEC", evar, Len(evar))
If elen = 0 Then
MsgBox "The COMSPEC variable does not exist on this system."
Else
evar = Left(evar, InStr(evar, Chr(0)) - 1)
MsgBox "COMSPEC = " & evar
End If
End
End Sub