没办法做到无限循环吗？？？？？？？找高手~~~~

tc5325429 · 发表于 2012-7-11 20:19:34

马上加入TC

您需要登录才可以下载或查看，没有帐号？立即注册

x

功能逻辑型开始_点击()

整型文件句柄=文件.打开("d:\\1.txt")
int i
i=0
字符型内容
循环(真)
如果(i<3)
内容=文件.读一行(文件句柄)
如果(i==0)
辅助.消息框(内容)
如果结束
如果(i==1)
辅助.消息框(内容)
如果结束
如果(i==2)
辅助.消息框(内容)
如果结束
i=i+1
如果(i==3)
内容=文件.读一行(文件句柄)
i=i-3
如果结束
如果结束
循环结束

弹出3次后，第4次开始就全都是空白的。。没办法做到无限循环吗？？？？？？？找高手~~~~

jrflsh · 发表于 2012-7-12 14:03:18

字符型[] 数组
数组=字符型[10000]
整型计数
计数=0
字符型内容
整型文件句柄=文件.打开("d:\\1.txt") //打开文件
循环(真)
内容=文件.读一行(文件句柄)
数组[计数]=内容 //读取的内容直接写入到数组内了
计数=计数+1
如果(字符串.长度(内容)==0) //当内容的字符串等于0的时候，就是读取完毕了,然后就跳出这个循环
跳出
如果结束
循环结束

复制代码

这样就可以了
有多少都可以读取，没有必要写那么长的代码，如果1000个帐号密码，照你那样写就得写两千多行吧？不累么？
当内容内的字符为空的时候
就是读取完毕了
直接跳出这个循环
所有读取的内容都写到数组内了
第一次贴出代码来，觉得好就采纳最佳答案哦
别让人太失望了

shadow · 发表于 2012-7-11 20:25:28

表示不懂你的意思汗

陌上青衣。 · 发表于 2012-7-11 20:37:12

乱改我代码

无限读的代码

整型文件句柄=文件.打开("d:\\1.txt")
int i
循环(真)
字符型内容=文件.读一行(文件句柄)
如果(内容=="")
跳出
如果结束
如果(i==1)//读第二行
辅助.消息框(内容)
如果结束
如果(i==2)//第三行也行,以此类推
辅助.消息框(内容)
如果结束
如果(i==100) //读99行
辅助.消息框(内容)
如果结束
i=i+1
循环结束
文件.关闭(文件句柄)

复制代码

tc5325429 · 发表于 2012-7-11 20:47:50

回复 3楼陌上青衣。的帖子

被你发现了

我不是要一直下去，是要到了最后可以从头再来，例如:从一循环到一百，然后继续从一开始循环到一百。
你这个好像i+到一百后就不走了吧？？？？

wutao2361 · 发表于 2012-7-11 20:50:25

回复 1楼tc5325429的帖子

你自已看看代码啊。你循环里边最大的如果是I小于3，当然只有三次就退出了。

你把如果结束放到:
如果(i<3)
内容=文件.读一行(文件句柄)
后面就无限循环了.最好把〈3改〉3，

功能逻辑型开始_点击()

整型文件句柄=文件.打开("d:\\1.txt")
int i
i=0
字符型内容
循环(真)
如果(i>3)
内容=文件.读一行(文件句柄)
如果结束
如果(i==0)
辅助.消息框(内容)
如果结束
如果(i==1)
辅助.消息框(内容)
如果结束
如果(i==2)
辅助.消息框(内容)
如果结束
i=i+1
如果(i==3)
内容=文件.读一行(文件句柄)
i=i-3
如果结束
循环结束

tc5325429 · 发表于 2012-7-11 21:02:33

回复 5楼wutao2361的帖子

我这边运行还是没办法做到无限，你可以运行到无限循环吗？？？

陌上青衣。 · 发表于 2012-7-11 21:16:02

从头到尾读那么多次来干嘛的

tc5325429 · 发表于 2012-7-11 21:32:14

回复 7楼陌上青衣。的帖子

用来干坏事

zhangopg · 发表于 2012-7-11 22:47:21

吃多撑的

[已解决] 没办法做到无限循环吗？？？？？？？找高手~~~~

马上加入TC

站长推荐 /2

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