八月的樱花 发表于 2016-6-7 20:50:48

请问这个取系列进程PID的程序代码哪里有问题,为什么返回是0?

请问这个取系列进程PID的程序代码哪里有问题,为什么返回是0?编辑框2没有内容

.版本 2
.支持库 eAPI
.支持库 spec
.程序集 窗口程序集1
.程序集变量 成员数, 整数型
.程序集变量 数组, 进程信息, , "0"

.子程序 _按钮2_被单击
.局部变量 进程名, 文本型
.局部变量 C, 整数型
.局部变量 N, 整数型

编辑框1.内容 = 进程名
数组 = 取系统进程列表 () ' 获取程序进程的列表
调试输出 (C)
成员数 = 取数组成员数 (数组) ' 取进程的数量
.计次循环首 (成员数, N)
.如果真 (进程名 = 数组 .进程名称)
数组 .进程标识符 = C
.如果真结束

.计次循环尾 ()
编辑框2.内容 = 到文本 (C)

一个人在漂 发表于 2016-6-7 20:52:55

.版本 2
.支持库 eAPI
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 数组, 进程信息, , "0"

.子程序 _按钮1_被单击
.局部变量 进程名, 文本型
.局部变量 C, 整数型
.局部变量 成员数, 整数型
.局部变量 N, 整数型

进程名 = 编辑框1.内容
数组 = 取系统进程列表 () ' 获取程序进程的列表
成员数 = 取数组成员数 (数组) ' 取进程的数量
.计次循环首 (成员数, N)
.如果真 (到小写 (数组 .进程名称) = 到小写 (进程名))
C = 数组 .进程标识符
调试输出 (C)
.如果真结束

.计次循环尾 ()
编辑框2.内容 = 到文本 (C)
页: [1]
查看完整版本: 请问这个取系列进程PID的程序代码哪里有问题,为什么返回是0?