用Environ得到系统所有环境变量
2008-07-16 07:25
232 查看
Private Sub Command1_Click()
Dim buf As String, msg As String, idx As Integer
idx = 1
Do
buf = Environ(idx)
msg = msg & buf & vbCrLf
idx = idx + 1
Loop Until buf = ""
MsgBox msg
End Sub
Dim buf As String, msg As String, idx As Integer
idx = 1
Do
buf = Environ(idx)
msg = msg & buf & vbCrLf
idx = idx + 1
Loop Until buf = ""
MsgBox msg
End Sub
相关文章推荐
- 以Windows系统服务得到活动用户的用户名、UserProfile与环境变量
- 输出linux系统的所有环境变量实例
- linux中修改环境变量之后导致系统崩溃(用户所有命令不能使用)的解决办法
- C#: 得到系统中的环境变量(源代码)
- Java代码获取所有系统环境变量
- 得到系统的环境变量System.getenv(),以及for each优点
- 查看所有系统环境变量
- 【ThinkingInJava】22、得到系统的环境变量
- C#中如何获取系统环境变量
- Go语言获取(*nux)系统环境变量
- 关于cmd系统控制台在启动时读取环境变量
- 系统环境变量举例
- Spring配置文件获取系统的环境变量
- [Source Code]在程序中取得系统的环境变量
- java获取所有系统变量
- Go环境变量配置及系统配置文件的区别
- windows 启动某些文件的快捷方式 ”系统环境变量?“
- 环境变量中的用户变量与系统变量的区别
- Linux进入系统时自动设置环境变量的方法
- 通过WMIC增加系统环境变量