Environ Function
αααα‘ααβαααααβααβα’αααβααα·ααααΆαβαα½αβααΆβααααβα’ααααΒ α α’αααβααα·ααααΆαβααΉαβααα’ααβααΎβααααααβααβααααααααβααααα·ααααα·ααΆα αααβα’αααβααΆαΒ α
ααΆαααβααααααα α
Environ (Environment As String)
αααααβαααα‘αα α
ααααβα’αααα
αααΆαααΆαααααα α
Environment α α’αααβααα·ααααΆα αααβα’αααβα ααβαααα‘ααβαααααβαααααΆααΒ α
α§ααΆα ααα α
Sub ExampleEnviron
Dim sTemp As String
sTemp=Environ ("TEMP")
If sTemp = "" Then sTemp=Environ("TMP")
MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:"
End Sub