问个判断是否存在进程的问题

wojoo

我想在执行程序后 判断进程内是否存在QQ.exe 如果存在 就将QQ.exe强制结束掉。  请各位大牛给个详细点的思路或者源码。最好能给详细点的说明。谢谢

一阵狂风

.程序集 窗口程序集1
.程序集变量 窗口句柄, 整数型
.程序集变量 进程ID, 整数型

.子程序 __启动窗口_创建完毕

窗口句柄 ＝ 窗口_取句柄 (, , “TXGuiFoundation”, “QQ2014”)
进程ID ＝ 窗口_句柄取进程ID (窗口句柄)

.子程序 _按钮1_被单击

.如果真 (进程_是否存在 (“QQ.exe”) ＝ 真)
    进程_结束 (进程ID)
.如果真结束