.版本 2.支持庫 iext.程序集 窗口程序集_啟動窗口.程序集變量 程序集_讀入的字節集, 字節集.子程序 _打開文件_被選擇.局部變量 臨時_文件路徑, 文本型.局部變量 i, 整數型.局部變量 臨時_文件內容, 文本型.局部變量 臨時_分割每行文本, 文本型, , "0".局部變量 臨時_分割文本, 文本型, , "0".局部變量 臨時_索引, 整數型.如果真 (通用對話框1.打開 ())  ' 如果用戶選擇了打開某個文件 執行以下操作  臨時_文件路徑 ＝ 通用對話框1.文件名  程序集_讀入的字節集 ＝ 讀入文件 (臨時_文件路徑)  臨時_文件內容 ＝ 到文本 (程序集_讀入的字節集)  臨時_分割每行文本 ＝ 分割文本 (臨時_文件內容, #換行符, )  .計次循環首 (取數組成員數 (臨時_分割每行文本), i)    臨時_分割文本 ＝ 分割文本 (臨時_分割每行文本 [i], “----”, )    臨時_索引 ＝ 超級列表框1.插入表項 (-1, 到文本 (i), , , , )    超級列表框1.置標題 (臨時_索引, 1, 臨時_分割文本 [1])    超級列表框1.置標題 (臨時_索引, 2, 臨時_分割文本 [2])  .計次循環尾 ().如果真結束.子程序 _保存文件_被選擇.如果真 (通用對話框2.打開 ())  寫到文件 (通用對話框2.文件名, 程序集_讀入的字節集).如果真結束