树形框搜索列表内容

读文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\blank.txt”))
分割后文本 ＝ 分割文本 (读文件, #换行符, )
.计次循环首 (取数组成员数 (分割后文本), i)
.如果 (寻找文本 (分割后文本 [i], “,”, , 假) ＝ -1)
索引 ＝ 树型框1.加入项目 (-1, 分割后文本 [i], , , , , )
树型框2.加入项目 (-1, “”, , , , , )
.否则
树型框1.加入项目 (索引, 取文本左边 (分割后文本 [i], 寻找文本 (分割后文本 [i], “,”, , 假) － 1), , , , , )
树型框2.加入项目 (索引, 文本_取右边 (分割后文本 [i], “,”), , , , , )
.如果结束

.计次循环尾 ()
树形框搜索列表内容开源。