如何用VB编写关闭进程的程序代码

Private Declare Function FindWindows Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Private Const WM_CLOSE = &H10

Private Sub Command1_Click()

'winhwnd = FindWindows("Windows 任务管理器", vbNullString) '知道窗口类名，关闭

winhwnd = FindWindows(vbNullString, "Microsoft Word") '知道窗口标题，关闭

Call PostMessage(winhwnd, WM_CLOSE, 0&, 0&)

End Sub

3

windows

xp的关机是由shutdownexe程序来控制的，位于windows＼system32文件夹中

。如果想让windows

2000也实现同样的效果，可以把shutdownexe复制到系统目录下。

比如你的电脑要在22:00关机，可以选择“开始→运行”，输入“at

22:00

shutdown

-s”，这样，到了22点电脑就会出现“系统关机”对话框，默认有30秒钟的倒计时并提示你保存工作。如果你想以倒计时的方式关机，可以输入“shutdownexe

-s

-t

3600”，这里表示60分钟后自动关机，“3600”代表60分钟。

设置好自动关机后，如果想取消的话，可以在运行中输入“shutdown

-a”。另外输入“shutdown

-i”，则可以打开设置自动关机对话框，对自动关机进行设置。

shutdownexe的参数，每个都具有特定的用途，执行每一个都会产生不同的效果，比如“-s”就表示关闭本地计算机，“-a”表示取消关机 *** 作，下面列出了更多参数，大家可以在shutdownexe中按需使用。

-f：强行关闭应用程序

-m

\\计算机名：控制远程计算机

-i：显示图形用户界面，但必须是shutdown的第一个选项

-l：注销当前用户

-r：关机并重启

-t时间：设置关机倒计时

-c

"消息内容"：输入关机对话框中的消息内容(不能超127个字符)

1楼的仁兄对API根本不了解，不懂就不要乱说哦～ API中是有终止进程的函数的，而且还不止一个，方法也很多。最简单的方法就是调用TerminateProcess函数。其他方法：比如强制卸载进程句柄、进程内存添添零、甚至可以注入进去，从内部生成一个异常，从而把进程挂掉…… API都实现不了、批处理怎么能实现？！明明是在开玩笑嘛！批处理内部本质上也要调用API的！

我十分赞同2楼仁兄的的代码，巧妙简洁。不过，如果给taskkill加参数/f会更好。呵呵～

下面是我的方法：（全部用API来实现，好让1楼的兄弟看看）

首先要获取QQ进程的PID，可以在任务管理器中看到，也可以用tasklist命令来得到。然后调用OpenProcess，最后一个参数添PID的值，该函数返回进程句柄。然后用返回的句柄作为参数来调用TerminateProcess就可以了。

具体代码如下：

int nPID = GetDlgItemInt(IDC_EDT_PID);

HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, TRUE, nPID);

TerminateProcess(hProcess, 0);

为了简单，我省略了出错处理代码，实际使用应加入错误处理程序。

上面的代码即可以用在MFC中，也可以用在SDK程序中。

以上就是关于如何用VB编写关闭进程的程序代码全部的内容，包括:如何用VB编写关闭进程的程序代码、求让windows自动关机并强制关闭应用程序的代码、c++关闭程序代码等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！