VB6禁止电脑关机的实现，阻止windows关机，反关机程序，不让Windows关机啊，不过不要耍流氓哦，这里仅供学习参考。一些核心的代码如下： 　　Dim ret As Long 　　记录Window Procedure的地址 　　preWinProc = GetWindowLong(wnd, GWL_WNDPROC) 　　开始截取消息,并将消息交给wndproc过程处理 　　取消消息截取，结束子分类过程. 　　ret = SetWindowLong(wnd, GWL_WNDPROC, preWinProc)