神马品牌网魔兽末日生存战攻略:vb中用怎么才能把整篇文件写入一个变量里然后显示出来？
来源：百度文库 编辑：神马品牌网 时间：2024/05/02 17:35:23
用OPEN …… for …… as
我打开一个文件的时候总是只显示头以行
我打开一个文件的时候总是只显示头以行
哦，这个在VB里是可以实现的，首先告诉你为什么你使用OPEN语句无法打印全部的内容而只能打印第一行。
因为，每一行之间都存在一个换行的问题，也就存在了一个换行符，普通使用Open语句在遇到换行的情况下就默认为文件已经结束，所以只能打印第一行，现在告诉你怎么来打印全部文件。
'代码开始！
'==========使用Open语句来打开文件==============
'打开的记事本文件，假设在D盘下为a.txt
Open "d:\a.txt" For Input As #1
'使用DO循环来判断是否读到文件末尾，EOF是用来判 _
文件是否读到末尾的，格式下面我告诉你。
Do While EOF(1) = False
'如果没有，则读取一行，并且赋值给a.
Line Input #1, a
'打印到窗口上
Print a
Loop '循环结束
close '关闭txt文件
解释一下，EOF用来判断文件是否读到最后一行，格式为
EOF(文件号）我上面打开的文件号是1，所以是EOF(1),它会返回一个布尔值，如果是TRUE则表示文件读到最后了，若是False,则表示文件还没读完。Line Input语句是用语逐行读取文件内容，读取一行后，文件读取位置会自动移到下一行。
我用这么长时间告诉你，你要给我分哦。。。还有什么不明白的地方就加我的QQ吧，276401936。说明一下，你把上面代码粘贴一下就可以了，但D盘下要有a.txt文件哦。
没分啊，真不想回答
哪怕你给5分我都回答，这是对回答者的尊重