防止Windows自动锁屏的VBA脚本

最新推荐文章于 2025-10-17 07:48:14 发布

原创最新推荐文章于 2025-10-17 07:48:14 发布 · 1.2w 阅读

12 ·

CC 4.0 BY-SA版权

文章标签：

#VBA #防屏保 #域用户

VBA 专栏收录该内容

0 篇文章

订阅专栏

本文介绍了一个简单的VBA脚本，通过周期性触发NUMLOCK键来防止Windows系统自动启动屏幕保护程序。该脚本适用于那些需要长时间保持显示器处于活动状态的场合。

部署运行你感兴趣的模型镜像

一个很简单的VBA脚本，可以防止Windows自动锁屏。

主要是利用了一个不常用的键 NUMLOCK。

' 先定义一个Shell对象
Set WshShell = WScript.CreateObject("WScript.Shell")

WScript.Sleep 5000
wshShell.SendKeys "{NUMLOCK}"
WScript.Sleep 500
wshShell.SendKeys "{NUMLOCK}"

'设置成正需要接续的时间
for i=1 to 180
'设置成比屏保时间短点就可以
	WScript.Sleep 180000
	wshShell.SendKeys "{NUMLOCK}"
	WScript.Sleep 500
	wshShell.SendKeys "{NUMLOCK}"
next

您可能感兴趣的与本文相关的镜像

Dify

AI应用

Agent编排

Dify 是一款开源的大语言模型（LLM）应用开发平台，它结合了后端即服务(Backend as a Service) 和LLMOps 的理念，让开发者能快速、高效地构建和部署生产级的生成式AI应用。它提供了包含模型兼容支持、Prompt 编排界面、RAG 引擎、Agent 框架、工作流编排等核心技术栈，并且提供了易用的界面和API，让技术和非技术人员都能参与到AI应用的开发过程中