不用API了。'引用Microsoft Internet Controls Dim IEwin As New ShellWindows For Each ie In IEwin ie.Quit Next
用 TerminateProcess 干掉IE的进程之后全部窗口就呜呼哀哉了。VB声明 Declare Function TerminateProcess Lib "kernel32" Alias "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long 说明 结束一个进程 在VB里使用 可以使用,但尽量不用 返回值 Long,非零表示成功,零表示失败。会设置GetLastError 参数表 参数 类型及说明 hProcess Long,指定要中断的一个进程的句柄 uExitCode Long,进程的一个退出代码 Top
Dim IEwin As New ShellWindows
For Each ie In IEwin
ie.Quit
Next
Declare Function TerminateProcess Lib "kernel32" Alias "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
说明
结束一个进程
在VB里使用
可以使用,但尽量不用
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
hProcess Long,指定要中断的一个进程的句柄
uExitCode Long,进程的一个退出代码 Top