知識點

1.遍歷程序，尋找符合要求程序的PID 

2.自定義函式：定義返回值和引數，結束時呼叫  返回（）命令

3.時間處理子程式可以對回車按鍵被按下產生反應

.版本 2
.支援庫 eAPI

.程式集 視窗程式集1
.程式集變數 a, 程序資訊, , "0"
.程式集變數 count, 整數型
.程式集變數 n, 整數型
.程式集變數 PID, 整數型

.子程式 _按鈕1_被單擊

a ＝ 取系統程序列表 ()
count ＝ 取陣列成員數 (a)
PID ＝ 子程式1 (編輯框1.內容)
編輯框2.內容 ＝ 到文字 (PID)

.子程式 子程式1, 整數型
.引數 x, 文字型

.計次迴圈首 (count, n)
    .如果真 (a [n].程序名稱 ＝ x)
        返回 (a [n].程序識別符號)
    .如果真結束

.計次迴圈尾 ()
返回 (0)

.子程式 _編輯框1_按下某鍵, 邏輯型
.引數 鍵程式碼, 整數型
.引數 功能鍵狀態, 整數型

.如果真 (鍵程式碼 ＝ #回車鍵)
    _按鈕1_被單擊 ()
.如果真結束