变形金刚合体视频:请哪位哥哥姐姐帮忙解释下这句vb代码

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/30 10:50:10
Dim myval As Long
myval = SystemParametersInfo(97, True, CStr(1), 0)

(97, True, CStr(1), 0)这4个参数什么意思 谢谢 成功回答再追加5分

SystemParametersInfo :设置系统参数的函数
97 : SPI_SETSCREENSAVERRUNNING 表示设置屏幕保护的系统参数的标志
True :激活屏幕保护
CStr(1) :返回时用的指针(这里不需要)。
0:用户的其他参数(这里不需要)。

SystemParametersInfo, SystemParametersInfoByval

VB声明
Declare Function SystemParametersInfo& Lib "user32" Alias "SystemParametersInf
oA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal
fuWinIni As Long)
Declare Function SystemParametersInfoByVal& Lib "user32" Alias
"SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal
lpvParam As Any, ByVal fuWinIni As Long)
说明
允许获取和设置数量众多的windows系统参数
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
uAction Long,指定要设置的参数。参考uAction常数表
uParam Long,参考uAction常数表
lpvParam Any,按引用调用的Integer、Long和数据结构。对于String数据,请用
SystemParametersInfoByval函数。具体用法参考uAction常数表
fuWinIni Long,取决于不同的参数及操作系统,随同这个函数设置的用户配置参数保存
在win.ini或注册表里,或同时保存在这两个地方。这个参数规定了在设置系统参数的时
候,是否应更新用户设置参数。可以是零(禁止更新),或下述任何一个常数:
SPIF_UPDATEINIFILE 更新win.ini和(或)注册表中的用户配置文件
SPIF_SENDWININICHANGE 倘若也设置了SPIF_UPDATEINIFILE,将一条WM_WININICHANGE消
息发给所有应用程序。否则没有作用。这调消息告诉应用程序已经改变了用户配置设置

注解
在调用这个函数之前,特别要注意将lpvParam参数定义成正确的数据类型