.版本 2 .子程序 _选择列表框_列表项被选择 显示编辑框.内容 ＝ 选择列表框.取项目文本 (选择列表框.现行选中项) .子程序 __启动窗口_创建完毕 时钟1.时钟周期 ＝ 5000 选择列表框.现行选中项 ＝ 0 .子程序 _时钟1_周期事件 .如果 (选择列表框.现行选中项 ≠ 选择列表框.取项目数 () － 1) 选择列表框.现行选中项 ＝ 选择列表框.现行选中项 ＋ 1 显示编辑框.内容 ＝ 选择列表框.取项目文本 (选择列表框.现行选中项) .否则 选择列表框.现行选中项 ＝ 0