网截写WPE程序wpe版本开源

.如果真 (列表框1.现行选中项 ≠ -1)
.计次循环首 (列表框1.现行选中项, i)
o ＝ o ＋ 取文本长度 (列表框1.取项目文本 (i － 1)) ＋ 1
.计次循环尾 ()
移动读写位置 (数据文件号, 1, o)
删除数据 (数据文件号, 取文本长度 (列表框1.取项目文本 (列表框1.现行选中项)) ＋ 2)
列表框1.现行选中项 ＝ -1
显示数据 ()