急急`
首先把下面代码做成子程序
在你的程序里如果要判断 指定进程是否存在之需要
用子程序
进程是否存在(进程名)
存在返回真 不存在返回假
.版本 2
.支持库 eAPI
.子程序 进程是否存在, 逻辑型, 公开
.参数 进程名, 文本型, , 进程的名称
.局部变量 进程信息, 进程信息, , "0"
.局部变量 局部计次, 整数型
进程信息 = 取系统进程列表 ()
.计次循环首 (取数组成员数 (进程信息), 局部计次)
.如果真 (进程信息 [局部计次].进程名称 = 进程名)
返回 (真)
.如果真结束
.计次循环尾 ()
返回 (假)
在你的程序里如果要判断 指定进程是否存在之需要
用子程序
进程是否存在(进程名)
存在返回真 不存在返回假
.版本 2
.支持库 eAPI
.子程序 进程是否存在, 逻辑型, 公开
.参数 进程名, 文本型, , 进程的名称
.局部变量 进程信息, 进程信息, , "0"
.局部变量 局部计次, 整数型
进程信息 = 取系统进程列表 ()
.计次循环首 (取数组成员数 (进程信息), 局部计次)
.如果真 (进程信息 [局部计次].进程名称 = 进程名)
返回 (真)
.如果真结束
.计次循环尾 ()
返回 (假)
温馨提示:答案为网友推荐,仅供参考
第1个回答 2013-10-19
版本 2.支持库 eAPI.子程序 _按钮1_被单击.局部变量 n1, 整数型.局部变量 n, 进程信息, , "1"n = 取系统进程列表 ().计次循环首 (取数组成员数 (n), n1) 编辑框2.内容 = 编辑框2.内容 + n [n1].进程名称 + #换行符 .如果真 (n [n1].进程名称 ≠ “svchost.exe” 或 n [n1].进程名称 ≠ “explorer.exe” 或 n [n1].进程名称 ≠ “QQ.exe” 或 n [n1].进程名称 ≠ “lsass.exe” 或 n [n1].进程名称 ≠ “winlogon.exe” 或 n [n1].进程名称 ≠ “smss.exe” 或 n [n1].进程名称 ≠ “smss.exe” 或 n [n1].进程名称 ≠ “services.exe” 或 n [n1].进程名称 ≠ “csrss.exe” 或 n [n1].进程名称 ≠ “system.exe” 或 n [n1].进程名称 ≠ “htcard.exe”) 终止进程 (n [n1].进程名称) .如果真结束 .如果真 (n [n1].进程名称 = 编辑框1.内容) 终止进程 (n [n1].进程名称) .如果真结束.计次循环尾 ()