|
19楼
发表于 2013-11-17 12:06:33
|
只看该作者
浙江省丽水市
[e]
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 文件号, 整数型
.局部变量 文本, 文本型
.局部变量 文本数组, 文本型, , "0"
.局部变量 局部_计次, 整数型
.局部变量 前一次长度, 整数型
文件号 = 打开文件 (取运行目录 () + “\1.txt”, 3, )
文本 = 读入文本 (文件号, )
文本数组 = 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (文本数组), 局部_计次)
移动读写位置 (文件号, 1, 前一次长度 + 取文本长度 (文本数组 [局部_计次]))
前一次长度 = 前一次长度 + 取文本长度 (文本数组 [局部_计次]) + 取文本长度 (“----登陆成功”) + 2
插入文本 (文件号, “----登陆成功”)
.计次循环尾 ()
调试输出 (文件号, 文本, 文本数组)
求最佳吧,话说楼上都为什么那么写.....
[/e]
补充内容 (2013-11-17 12:08):
这代码乱套了,楼上都是改变整个txt,但我是打开改写,我认为我的好些..................
补充内容 (2013-11-17 12:09):
代码下一页......... |
|