TC5.0正式上线活动礼包感恩回馈

26666180 · 发表于 2015-4-22 21:21:24

真心不错,学了两年了。。。。

26666180 · 发表于 2015-4-22 21:21:28

真心不错,学了两年了。。。。

26666180 · 发表于 2015-4-22 21:21:31

真心不错,学了两年了。。。。

26666180 · 发表于 2015-4-22 21:21:36

真心不错,学了两年了。。。。

mitchs · 发表于 2015-4-22 22:55:46

我顶

mitchs · 发表于 2015-4-22 22:56:00

我顶

mitchs · 发表于 2015-4-22 22:56:11

我顶

mitchs · 发表于 2015-4-22 22:56:33

我顶

hlincs · 发表于 2015-4-23 08:07:28

变量文件路径="D:\\1.txt"
变量文本=数组()
变量 hang= 文件获取行数(文件路径)
调试输出(hang)
变量键=0
遍历(变量 i = 0; i < hang-1; i++)
      变量判断=0

      遍历(变量 j = i+1; j < hang; j++)
         如果(文件读指定行(文件路径,i)==文件读指定行(文件路径,j))
            判断=1
         结束
      结束
      如果(判断==0)
         文本[键]=文件读指定行(文件路径,i)
         调试输出(文本[键])
         键++
      结束
结束
文件覆盖内容(文件路径,文本[0])
遍历(变量 i = 1; i < 键; i++)
      文件追加文本(文件路径,"\n"&文本[i])
结束

Miss三三 · 发表于 2015-4-23 09:21:26

hlincs 发表于 2015-4-23 08:07
变量文件路径="D:\\1.txt"
变量文本=数组()
变量 hang= 文件获取行数(文件路径)

这个…………

帐号		自动登录	找回密码
密码			立即注册

[活动发布] TC5.0正式上线活动礼包感恩回馈

站长推荐 /2