.版本 2
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 数组, 进程信息, , "0"
.程序集变量 成员数, 整数型
.程序集变量 N, 整数型
.程序集变量 PID, 整数型
.子程序 _按钮1_被单击
数组 ＝ 取系统进程列表 ()
成员数 ＝ 取数组成员数 (数组)
.计次循环首 (成员数, N)
列表框1.加入项目 (数组 [N].进程名称 ＋ 到文本 (数组 [N].进程标识符), )
.计次循环尾 ()
.子程序 _按钮2_被单击
PID ＝ 取PID (编辑框1.内容)
信息框 (到文本 (PID), 0, , )
.子程序 取PID, 整数型, , 成功返回一个整数，失败返回0
.参数 进程名, 文本型
.局部变量 N, 整数型
数组 ＝ 取系统进程列表 ()
成员数 ＝ 取数组成员数 (数组)
.计次循环首 (成员数, N)
列表框1.加入项目 (数组 [N].进程名称 ＋ 到文本 (数组 [N].进程标识符), )
.如果真 (数组 [N].进程名称 ＝ 进程名)
返回 (数组 [N].进程标识符)
.如果真结束
.计次循环尾 ()
返回 (0)
已找到问题，最后一行代码返回忘记填内容了，已解决 |
楼主
