关闭屏幕保护功能改变屏保等待

天蓝情切

天蓝情切

2016-02-19 18:11

在这个颜值当道,屌丝闪边的时代,拼不过颜值拼内涵,只有知识丰富才能提升一个人的内在气质和修养,所谓人丑就要多学习,今天图老师给大家分享关闭屏幕保护功能改变屏保等待,希望可以对大家能有小小的帮助。
->如何关闭ScreenSave功能,改变Timeout时间
  
  此外希望只有本次使用Windows时改变(下次开机时还原原状),则最後参数改为 SPIF_SENDWININICHANGE(没有SPIF_UPDATEINIFILE)
  
  ConstSPI_SETSCREENSAVEACTIVE=17
  ConstSPI_SETSCREENSAVETIMEOUT=15
  ConstSPIF_SENDWININICHANGE=&H2
  ConstSPIF_UPDATEINIFILE=&H1
  
  PrivateDeclareFunctionSystemParametersInfoLib"user32"Alias_
  "SystemParametersInfoA"(ByValuActionAsLong,ByValuParamAsLong,_
  ByVallpvParamAsLong,ByValfuWinIniAsLong)AsLong
  
  PrivateSubSetScreenSaveTimeout(ByValBySecondAsLong)
   CallSystemParametersInfo(SPI_SETSCREENSAVETIMEOUT,BySecond,0,_
   SPIF_UPDATEINIFILE SPIF_SENDWININICHANGE)
  EndSub
  
  PrivateSubEnableScreenSave()
   CallSystemParametersInfo(SPI_SETSCREENSAVEACTIVE,1,0,_
   SPIF_UPDATEINIFILE SPIF_SENDWININICHANGE)
  EndSub
  PrivateSubDisableScreenSave()
   CallSystemParametersInfo(SPI_SETSCREENSAVEACTIVE,0,0,_
   SPIF_UPDATEINIFILE SPIF_SENDWININICHANGE)
  EndSub->->

展开更多 50%)
分享

猜你喜欢

关闭屏幕保护功能改变屏保等待

编程语言 网络编程
关闭屏幕保护功能改变屏保等待

用VB实现屏幕滚屏保护效果

编程语言 网络编程
用VB实现屏幕滚屏保护效果

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

怎么关闭win7旗舰版的屏幕保护功能

电脑网络
怎么关闭win7旗舰版的屏幕保护功能

win7如何关闭屏幕保护?

电脑网络
win7如何关闭屏幕保护?

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

win7关闭屏幕保护方法

电脑网络
win7关闭屏幕保护方法

猎豹清理大师充电屏保功能关闭方法图解

手机软件 应用软件
猎豹清理大师充电屏保功能关闭方法图解

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

在VB中更改SQLServer数据库结构

在VB中更改SQLServer数据库结构

VisualBasic6中发送邮件的新方法

VisualBasic6中发送邮件的新方法
下拉加载更多内容 ↓