精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: ExpandEnvironmentStrings(硬件与系统)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:36:46 星期四), 转信

【以下文字转载自 cnTemp 讨论区】
【原文由 catchy 所发表】
发信人: yucheng (无话可说), 信区: VisualBasic
发信站: BBS 水木清华站 (Wed Mar 29 23:40:21 2000) WWW-POST

ExpandEnvironmentStrings

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

--

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: casi.bbs@smth.org]
--
※ 转载:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: 202.118.247.254]

VB 版 (精华区)