VB怎么绕过QueryUnload事件直接关闭程序

来源:百度知道 编辑:UC知道 时间:2024/06/05 06:04:46
如题~
即强行关闭运行中的程序。

最近的分都全部给扣掉了,所以不敢打分。如遇正解一定给分!
SendMessage 我老早就用过了,无法逃脱外部进程的关闭检测。无用...

用这个吧,我还以为你用在自身程序呢.

'禁止"Explorer"运行

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Public Sub StopExplorer()
Dim i As Integer
For i = 1 To 10
Call Shell("tskill explorer", 0)'你得知道它的名字,否则用列表枚举出来代码可多着呢.
Sleep 100
Next
End Sub

'*****************************************************

'###################禁止进程函数####################

'禁止进程函数的Bas文件,可以禁止监视的进程拒绝运行.

'编写作者:刘俊宾

'作者主页:http://hystudio.ik8.com

'编写日期:2007年1月15日

'示例:
'#######################################################################
'# If LookTask("Windows 任务管理器",True)=True Then # 监视"Windows 任务管理器"是否在运行(需配合Timer控件使用)[标题方式]
'# StopText("Windows 任务管理器&q