.支持庫 iext
.如果 (文件是否存在 (取運行目錄 () ＋ “/1.txt”))
名言 ＝ 取字節集數據 (讀入文件 (取運行目錄 () ＋ “/1.txt”), #文本型, )
.判斷循環首 (尋找文本 (名言, 到文本 (i), , 假) ≠ -1)
i ＝ i ＋ 1
' 輸出調試文本 (文本_取出中間文本 (名言, 到文本 (i) ＋ “、”, 到文本 (i ＋ 1) ＋ “、”))
局_索引 ＝ 超級列表框1.插入表項 (, 到文本 (i), , , , )
超級列表框1.置標題 (局_索引, 1, 名言_組)
.判斷循環尾 ()