• Home
 · 
• Files/File Controls/Input/Output
 · 
• Easy way to browse your computer informations (computer name & system folder...)

Easy way to browse your computer informations (computer name & system folder...)

Easy way to browse your computer informations (computer name & system folder...)

Rate Easy way to browse your computer informations (computer name & system folder...)

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()
Dim EnvString, Indx
Indx = 1   ' Initialize index to 1.
Do
   EnvString = Environ(Indx)   ' Get environment
MsgBox Indx & ": " & EnvString
Indx = Indx + 1
Loop Until Indx = 30

End Sub