编程论坛 → VB6论坛

敬请各位高手解决“关闭计算机”事件的问题。谢谢。

HVB6 发布于 2015-08-13 09:09， 579 次点击

有一个问题需要解决，即：（XP系统）点击→开始→关闭计算机→运行指定的程序完后→显示“关闭计算机”的窗体，其中“指定的程序”即为我们编辑的程序，该程序是希望在关闭计算机前，能使用此事件，把某一文件复制到指定的地方。

9 回复

wp2319572015-08-13 09:33

百度截获系统关机消息

wmf20142015-08-13 09:36

关机会触发窗体unload事件，应该有足够的时间做你需要的操作，你试下。

HVB62015-08-13 10:03

回复 2楼 wp231957

无现成的可以使用的方法。

HVB62015-08-13 10:04

回复 3楼 wmf2014

此“事件”如何能看到或者能为我所用，即“事件”发生→打开一个简单的程序：
sub mian
msgbox "ok"
end sub
显示ok后，计算机关机。
如果以上的目的能实现，即说明“事件”发生随便为我所用。

[ 本帖最后由 HVB6 于 2015-8-13 13:43 编辑 ]

xiangyue05102015-08-14 10:03

你这个其实应该也是后台常驻的。如果文件不大的话，我感觉不如直接监控这个文件，发现改变就拷贝。能确定调用这个文件的程序的话，监控程序也可以。

HVB62015-08-14 11:53

回复 6楼 xiangyue0510

您的方法已经实现，问题是有一个文件操作完后，就可以下班关机。但此文件操作完后产生其它的几个文件（它们又是在另一个文件夹中），也要下班关机前复制到指定的另一台机子中，而此工作到下班关机的时间很短，程序是来不及的，所以，就想是否有xp系统的“关机”事件可以利用。

wp2319572015-08-14 14:47

测试了一下：

c中：
case WM_QUERYENDSESSION:
MessageBox(NULL,TEXT("发现关机动作"),TEXT("注意"),MB_OK);
return 0;

可以完成一些动作 vb咋实现就不知道了

wp2319572015-08-14 14:57

没有发现小姑娘斑竹说的unload事件
但是在这个事件中也可以捕捉到关机消息：

Private Sub Form1_FormClosed(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed
MsgBox("发现关机动作")
End Sub

#10

HVB62015-08-14 21:04

回复 9楼 wp231957

9楼的代码是vb6的?