.版本 2.程序集 窗口程序集1.程序集變量 快捷信息, 文本型.程序集變量 分割信息, 文本型, , "0".子程序 _輸入編輯框_內(nèi)容被改變.局部變量 M, 整數(shù)型.如果真 (輸入編輯框.內(nèi)容 ＝ “”)  內(nèi)容列表框.可視 ＝ 假  返回 ().如果真結(jié)束內(nèi)容列表框.清空 ().計次循環(huán)首 (取數(shù)組成員數(shù) (分割信息), M)  .如果 (尋找文本 (分割信息 [M], 輸入編輯框.內(nèi)容, , 假) ≠ -1)    內(nèi)容列表框.插入項(xiàng)目 (0, 分割信息 [M], )    內(nèi)容列表框.可視 ＝ 真  .否則  .如果結(jié)束.計次循環(huán)尾 ().如果 (內(nèi)容列表框.取項(xiàng)目數(shù) () ＝ 0)  內(nèi)容列表框.可視 ＝ 假.否則  .如果真 (內(nèi)容列表框.取項(xiàng)目數(shù) () ≤ 10)    內(nèi)容列表框.高度 ＝ 14 × 內(nèi)容列表框.取項(xiàng)目數(shù) ()  .如果真結(jié)束  .如果真 (內(nèi)容列表框.取項(xiàng)目數(shù) () ＞ 10)    內(nèi)容列表框.高度 ＝ 140  .如果真結(jié)束.如果結(jié)束.子程序 __啟動窗口_創(chuàng)建完畢快捷信息 ＝ 到文本 (讀入文件 (取運(yùn)行目錄 () ＋ “/信息源.txt”))分割信息 ＝ 分割文本 (快捷信息, “*”, ).子程序 _錄入按鈕_被單擊寫到文件 (取運(yùn)行目錄 () ＋ “/信息源.txt”, 到字節(jié)集 (輸入編輯框.內(nèi)容 ＋ “*” ＋ 快捷信息))__啟動窗口_創(chuàng)建完畢 ().子程序 _內(nèi)容列表框_列表項(xiàng)被選擇輸入編輯框.內(nèi)容 ＝ 內(nèi)容列表框.取項(xiàng)目文本 (內(nèi)容列表框.現(xiàn)行選中項(xiàng))內(nèi)容列表框.清空 ()內(nèi)容列表框.可視 ＝ 假.子程序 _輸入編輯框_按下某鍵, 邏輯型.參數(shù) 鍵代碼, 整數(shù)型.參數(shù) 功能鍵狀態(tài), 整數(shù)型.如果真 (鍵代碼 ＝ 40)  內(nèi)容列表框.現(xiàn)行選中項(xiàng) ＝ 內(nèi)容列表框.現(xiàn)行選中項(xiàng) ＋ 1.如果真結(jié)束.如果真 (鍵代碼 ＝ 38)  內(nèi)容列表框.現(xiàn)行選中項(xiàng) ＝ 內(nèi)容列表框.現(xiàn)行選中項(xiàng) － 1.如果真結(jié)束.如果真 (鍵代碼 ＝ 13)  _內(nèi)容列表框_列表項(xiàng)被選擇 ().如果真結(jié)束