用VB获得操作系统路径示例和操作系统环境函数Environ
2006-04-17 22:31
513 查看
Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
_______________________________________________________
Private Sub Command1_Click()
Dim S As String
Dim Ret As Long
S = Space(1024)
Ret = GetSystemDirectory(S, 1024)
S = Left$(S, InStr(S, Chr(0)) - 1)
MsgBox S
MsgBox Environ(2)
End Sub
操作系统环境函数Environ 就是返回系统set环境变量的值
Private Sub command1_Click()
Dim i As Integer
For i = 1 To 100
Debug.Print Environ(i)
Next i
End Sub
_______________________________________________________
Private Sub Command1_Click()
Dim S As String
Dim Ret As Long
S = Space(1024)
Ret = GetSystemDirectory(S, 1024)
S = Left$(S, InStr(S, Chr(0)) - 1)
MsgBox S
MsgBox Environ(2)
End Sub
操作系统环境函数Environ 就是返回系统set环境变量的值
Private Sub command1_Click()
Dim i As Integer
For i = 1 To 100
Debug.Print Environ(i)
Next i
End Sub
相关文章推荐
- 有用的操作系统环境函数“Environ”
- 有用的操作系统环境函数Environ
- VB后台获得按键,并执行自己的函数(非钩子及热键)
- PHP的函数无法获得中文路径中的目录部分及文件名部分
- 获得系统特殊路径函数SHGetSpecialFolderLocation()
- 在.Net Framework中获得Windows目录、机器名、操作系统版本信息等系统环境信息
- 系统文件夹路径的系统宏定义及意义,使用SHGetFolderPath API获得路径示例
- VC6.0配置LUA编译环境及LUA调用C++函数的简单示例
- Windows环境C/C++ 获取当前执行程序路径的两个函数
- 使用LoadLibrary函数装载一个DLL文件,没有指定文件路径,那么操作系统搜索DLL文件的策略如下
- vb常用的内部函数(八):环境函数
- 获得计算机名,用户名,系统路径,环境路径等。
- 获得操作系统路径(java系统变量相关)
- shlwapi.h包含的操作系统路径相关的函数
- Delphi 中相对路径与绝对路径、系统环境变量等相关函数说明
- delphi如何获得当前操作系统语言环境
- 获得系统特殊路径函数SHGetSpecialFolderLocation()获取当前用户桌面
- C_获得当前的工作路径 _getcwd()函数:取得当前的工作目录(unix c和vc+6.0的都文件的区别)
- VB.NET的示例使用 AddressOf 运算符来指定线程的启动函数(多线程)
- Delphi 中相对路径与绝对路径、系统环境变量等相关函数说明