教程里仿任务管理器查看进程的显示加对齐空格

a253125215

自己写了个判断根据序号，PID的长度来加不同长度的空格，列表框里的显示结果看起来舒服多了，新手小白，高手勿笑应该还有更简洁的方法来实现空格对齐，想了解一下

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

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

.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 k, 文本型, , , 进程序号和PID之间的空格数量
.局部变量 m, 文本型, , , PID和进程名之间的空格数量


数组 ＝ 取系统进程列表 ()
成员数 ＝ 取数组成员数 (数组)

.计次循环首 (成员数, n)
    .判断开始 (n ＜ 10)
        k ＝ “       ”
    .判断 (n ＜ 100)
        k ＝ “      ”
    .判断 (n ＜ 1000)
        k ＝ “     ”
    .默认

    .判断结束
    .判断开始 (数组 [n].进程标识符 ＜ 10)
        m ＝ “          ”
    .判断 (数组 [n].进程标识符 ＜ 100)
        m ＝ “         ”
    .判断 (数组 [n].进程标识符 ＜ 1000)
        m ＝ “        ”
    .判断 (数组 [n].进程标识符 ＜ 10000)
        m ＝ “       ”
    .默认

    .判断结束


    列表框1.加入项目 (到文本 (n) ＋ k ＋ 到文本 (数组 [n].进程标识符) ＋ m ＋ 数组 [n].进程名称, )

.计次循环尾 ()

a253125215

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
数组	进程信息	0
成员数	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
n	整数型
k	文本型			进程序号和PID之间的空格数量
m	文本型			PID和进程名之间的空格数量

数组 ＝ 取系统进程列表 ()
成员数 ＝ 取数组成员数 (数组)
计次循环首 (成员数, n)
判断 (n ＜ 10)
k ＝ “       ”
判断 (n ＜ 100)
k ＝ “      ”
判断 (n ＜ 1000)
k ＝ “     ”


判断 (数组 [n].进程标识符 ＜ 10)
m ＝ “          ”
判断 (数组 [n].进程标识符 ＜ 100)
m ＝ “         ”
判断 (数组 [n].进程标识符 ＜ 1000)
m ＝ “        ”
判断 (数组 [n].进程标识符 ＜ 10000)
m ＝ “       ”


列表框1.加入项目 (到文本 (n) ＋ k ＋ 到文本 (数组 [n].进程标识符) ＋ m ＋ 数组 [n].进程名称, )
计次循环尾 ()

i支持库列表	支持库注释
eAPI	应用接口支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 eAPI<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 数组, 进程信息, , "0"<br /> .程序集变量 成员数, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 n, 整数型<br /> .局部变量 k, 文本型, , , 进程序号和PID之间的空格数量<br /> .局部变量 m, 文本型, , , PID和进程名之间的空格数量<br /> <br /> <br /> 数组 ＝ 取系统进程列表 ()<br /> 成员数 ＝ 取数组成员数 (数组)<br /> <br /> .计次循环首 (成员数, n)<br />     .判断开始 (n ＜ 10)<br />         k ＝ “       ”<br />     .判断 (n ＜ 100)<br />         k ＝ “      ”<br />     .判断 (n ＜ 1000)<br />         k ＝ “     ”<br />     .默认<br /> <br />     .判断结束<br />     .判断开始 (数组 [n].进程标识符 ＜ 10)<br />         m ＝ “          ”<br />     .判断 (数组 [n].进程标识符 ＜ 100)<br />         m ＝ “         ”<br />     .判断 (数组 [n].进程标识符 ＜ 1000)<br />         m ＝ “        ”<br />     .判断 (数组 [n].进程标识符 ＜ 10000)<br />         m ＝ “       ”<br />     .默认<br /> <br />     .判断结束<br /> <br /> <br />     列表框1.加入项目 (到文本 (n) ＋ k ＋ 到文本 (数组 [n].进程标识符) ＋ m ＋ 数组 [n].进程名称, )<br /> <br /> .计次循环尾 ()