删贴

惊人

删贴删贴删贴删贴删贴

9393600060

怎么删除自己的帖子？？？？？？？？？？

9393600060

.版本 2
.支持库 iext

.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
.局部变量 第一次分割, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 第二次分割, 文本型, , "0"
.局部变量 文本, 文本型

' txt文本格式
' 姓名----411528199911112222----地址
.如果真 (取文本右边 (接收到的文件路径, 4) ＝ “.txt”)
    超级列表框1.全部删除 ()
    文本 ＝ 到文本 (读入文件 (接收到的文件路径))
    第一次分割 ＝ 分割文本 (文本, #换行符, )
    .计次循环首 (取数组成员数 (第一次分割), n)
        超级列表框1.插入表项 (, , , , , )
        超级列表框1.置标题 (n － 1, 0, 到文本 (n))
        第二次分割 ＝ 分割文本 (第一次分割 [n], “----”, )
        超级列表框1.置标题 (n － 1, 1, 到文本 (第二次分割 [1]))
        超级列表框1.置标题 (n － 1, 2, 到文本 (第二次分割 [2]))
        超级列表框1.置标题 (n － 1, 3, 到文本 (第二次分割 [3]))
    .计次循环尾 ()