| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
超级列表框1.类型 ＝ 组合框1.现行选中项
超级列表框1.
刷新显示 ()| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| wjh | 整数型 | | |
| 行 | 文本型 | | 5 |
| 文本 | 文本型 | | |
超级列表框1.
全部删除 ()
如果真 (通用对话框2.
打开 ())
wjh ＝
打开文件 (通用对话框2.文件名,
#读写, )
判断循环首 (取反 (是否在文件尾 (wjh,
真))
)文本 ＝
删首尾空 (读入一行 (wjh
))
行 ＝
分割文本 (文本,
“\\”,
)超级列表框1.
插入表项 (0, 行
[1
],
到数值 (行
[5
]), -1, ,
)超级列表框1.
置标题 (0, 1, 行
[2
])超级列表框1.
置标题 (0, 2, 行
[3
])超级列表框1.
置标题 (0, 3, 行
[4
])
判断循环尾 ()关闭文件 (wjh)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| wjh | 整数型 | | |
| i | 整数型 | | |
| 表项 | 文本型 | | |
如果真 (通用对话框1.
打开 ())
wjh ＝
打开文件 (通用对话框1.文件名,
#重写, )计次循环首 (超级列表框1.
取表项数 (), i
)表项 ＝ 表项 ＋ 超级列表框1.
取标题 (i － 1, 0
) ＋
“\\” ＋ 超级列表框1.
取标题 (i － 1, 1
) ＋
“\\” ＋ 超级列表框1.
取标题 (i － 1, 2
) ＋
“\\” ＋ 超级列表框1.
取标题 (i － 1, 3
) ＋
“\\” ＋
到文本 (超级列表框1.
取图片 (i － 1, 0
)) ＋
#换行符 计次循环尾 ()写出文本 (wjh, 表项
)信息框 (“保存成功”, 0, ,
)关闭文件 (wjh
)
载入 (窗口1, _启动窗口,
真)弹出菜单 (右键菜单, ,
)如果真 (超级列表框1.现行选中项 ＝ -1
)信息框 (“你选择的位置不正确，需要选择姓名那列”, 0, ,
)返回 ()载入 (窗口2, _启动窗口, 真)如果真 (超级列表框1.现行选中项 ＝ -1
)信息框 (“请选择表项（姓名那一列）”, 0, ,
)返回 ()超级列表框1.删除列 (超级列表框1.现行选中项)超级列表框1.
全部删除 ()| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 内容 | 文本型 | | |
| 索引 | 整数型 | | |
| i | 整数型 | | |
输入框 (“请输入要cha询的内容：”,
“输入cha询内容”, , 内容, ,
)索引 ＝ 超级列表框1.
查找表项 (内容, 0, 假, -1
)如果 (索引 ＝ -1
)信息框 (“cha询失败！或没有内容”, 0, ,
)
编辑框1.内容 ＝
“ ”
超级列表框1.
保证显示 (索引
)
内容 ＝
“”计次循环首 (超级列表框1.
取列数 (), i
)内容 ＝ 内容 ＋ 超级列表框1.
取标题 (索引, i － 1
) ＋
“ ”编辑框1.内容 ＝
“您找的内容在第” ＋
到文本 (索引 ＋ 1
) ＋
“行 ： ” ＋ 内容
计次循环尾 () 
超级列表框1.
进入编辑 (超级列表框1.现行选中项
)