请教如何关闭监视器(无信号输入)◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎◎

Bugs1984 2003-09-23 10:28:36
各位高手有谁懂得用VB6编写 关闭监视器的程序--目的是
(1)使监视器没有信号输入(就像电源管理中的“XX分钟之后关闭监视器”的效果一样!而不只是黑屏。
(2)要有恢复功能来启用监视器。
(3)鼠标和键盘事件都不能启用已经(用该程序)关闭了的监视器,必须由程序才能启用
(4)最重要的是要能在 WinXP,2000下运行,其次是能在98,ME运行!!!!
---------------------------------
一经测试成功--立即给分!!---决不食言

...全文
333 点赞 收藏 15
写回复
15 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Tadpole0510 2003-10-10
又疯了。。。。
回复
up
学习
回复
Bugs1984 2003-09-28
现在---------



























需要 “更改刷新频率”的方法!!!!!!!!

回复
aha99 2003-09-26
给楼主一个办法,用timer 控制,每0。5秒钟关闭一次,即使动鼠标键盘显示器也反应不过来。而且打开更简单了。。。
回复
aha99 2003-09-26
设置不能成功。。。
回复
aha99 2003-09-26
楼主好高啊,这样的话不怕显示器烧坏了。而且在正常运行下好像windows对这些东西都有保护。
回复
Bugs1984 2003-09-25
现在换个角度思考--
因为当显示器的设置超出它所能支持的范围时--显示器就会被迫关闭
例如某显示器只支持最高 1024×768×32bit × 75Hz刷新频率
--现在要改变(升高) 分辨率 或 刷新频率 使得显示器超负荷而关闭!
--当需要再次启用时--就把显示器的设置恢复原值。

现在本人需要 “更改刷新频率”的方法!!!!!!!!
请问有哪位高手可以帮帮忙,实现上述功能(最好有VB源码!E-mail: bugs1984@21cn.com )
------------------ 谢 :)
回复
jlum99 2003-09-24
关闭显示器在汇编里还是比较方便的,VB不知道.
回复
Gelim 2003-09-24
楼主的要求很苛刻啊!UP!
回复
踏平扶桑 2003-09-24
截取到鼠标和键盘事件
回复
Bugs1984 2003-09-24
hongsongboy(红松)的办法的确可以关闭和恢复显示器,
只是一遇到鼠标和键盘事件,显示器就会开启了。
请问有没有办法可以令 鼠标和键盘事件 都不能够影响显示器当前的状态吗?(前提是--不能禁用鼠标或键盘!!)

谢。
回复
lndlwwh830 2003-09-24
关注
回复
hxy2003 2003-09-24
GZ
回复
hongsongboy 2003-09-24
Option Explicit

Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal wMsg As _
Long, ByVal wParam As Long, lParam As Any) As Long
Const WM_SYSCOMMAND = &H112&
Const SC_MONITORPOWER = &HF170&

SendMessage Me.hwnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal 2& ''关闭显示器

SendMessage Me.hwnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal -1& ''打开显示器

回复
jintianatxd 2003-09-24
关注。
回复
发帖
API
创建于2007-09-28

1461

社区成员

VB API
申请成为版主
帖子事件
创建了帖子
2003-09-23 10:28
社区公告
暂无公告