|
|
VB声明 |
Declare Function ExpandEnvironmentStrings Lib
"kernel32" Alias "ExpandEnvironmentStringsA" (ByVal lpSrc As String,
ByVal lpDst As String, ByVal nSize As Long) As Long |
说明 |
扩充环境字串。具体操作过程与命令行处理的所为差不多。也就是说,将由百分号封闭起来的环境变量名转换成那个变量的内容。比如,“%path%”会扩充成完整路径。在vb里经常用于为新进程创建一个环境块 |
返回值 |
Long,lpDst要求的缓冲区的大小。如nSize小于这个数字(也就是说,缓冲区太小,以至不能全容下扩充过后的字串),那么lpDst不会被载入。可利用这个结果改变字串的大小。零表示遇到错误。会设置GetLastError |
参数表 |
参数 |
类型及说明 |
lpSrc |
String,欲扩充的字串 |
lpDst |
String,扩充过后的字串 |
nSize |
Long,lpDst的长度。注意预先对lpDst进行初始化,使其与这个长度相符 |
示例 |
Dim s$, dl&
Dim y As String * 5
s$ = "%PATH%"
dl& = ExpandEnvironmentStrings(s$, y, 499)
Print y |
|