读取2个TXT文件代码错误！！！！！！！

Question

本帖最后由 bcrun 于 2010-09-06 14:10:35 编辑

Answer 1

本帖最后由 bcrun 于 2010-09-06 14:10:57 编辑

  

Answer 2

打开文件（编号#1）只能是一个编号关闭前不能重复楼上的大哥帮你分开了：Input As #1
For Input As #2

Answer 3

这代码是读取整个TXT内容，而不是TXT一次一行下读的，我想要的是把TXT中的文字一次一行循环往下读取！望老师再辛苦辛苦！！！！！！

Answer 4

本帖最后由 bcrun 于 2010-09-06 14:13:09 编辑

  

Answer 5

Line Input #1, bb你一直在读#1号文件，你的#2号文件在那里读？
改为Line Input #2, bb了试试更间单的方法是一次读完整个文件放进数组，用数组下标索引来取你想要的第几行

Answer 6

 Dim ca1 As String= "C:\Program Files\您的产品\歌唱比赛数据库\选手名单\选手姓名.txt"
 Dim ca2 As String="C:\Program Files\您的产品\歌唱比赛数据库\参赛曲目\参赛曲目.txt"Dim aa As String() = IO.File.ReadAllLines(ca1)
Dim bb As String() = IO.File.ReadAllLines(ca2)
aa(0)就是选手姓.txt的第一行,1是第二行.......
bb(0)就是参赛曲目.txt的第一行,1是第二行.......下面你要怎样放进Text1或Text2就进行循环就行了