.版本 2 .支持库 iext .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .局部变量 i, 整数型 .局部变量 ii, 整数型 .局部变量 临时表象, 整数型 .计次循环首 (5, i) 超级列表框1.插入列 (i － 1, “列” ＋ 到文本 (i), 150, , , ) .计次循环尾 () .计次循环首 (10, i) 临时表象 ＝ 超级列表框1.插入表项 (, , , , , ) .计次循环首 (5, ii) 超级列表框1.置标题 (临时表象, ii － 1, “第” ＋ 到文本 (临时表象 ＋ 1) ＋ “行,第” ＋ 到文本 (ii) ＋ “列的内容”) .计次循环尾 () .计次循环尾 () .子程序 _超级列表框1_鼠标左键被按下, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 .局部变量 表项信息, 表项结构信息 表项信息.横向 ＝ 横向位置 表项信息.纵向 ＝ 纵向位置 取表项结构信息 (超级列表框1.取窗口句柄 (), 4153, 0, 表项信息) 全局_当前点击列 ＝ 表项信息.列 编辑框1.内容 ＝ 超级列表框1.取标题 (表项信息.行, 表项信息.列) .子程序 _超级列表框1_被双击, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 置剪辑板文本 (超级列表框1.取标题 (超级列表框1.现行选中项, 全局_当前点击列))