vb用input出错，说什么超出文件尾

Question

private sub command1_click
dim stri as string
open "C;\l.bat" for input as #1
input stri '在这里出错
close #1
end sub

Answer 1

VB输入超出文件尾是指你想读取超出文件结尾之后的部分，当然不可能，
这个是由于VB 内部采用Unicode方式问题，你所读取的文件中可能含有中文（全角字符）和英文（半角字符）导致，甚至是空的文件。
解决的方法
1.用二进制打开，用GET方法读入

Open "d:\test1.txt" For Binary As filenum1 
TextLine = Space(LOF(filenum1)) 
Get filenum1, , TextLine

遇到大的文件载入就满点了。
2..用RichTextBox控件实现。
添加部件:Microsoft Rich Textbox Control 6.0
添加控件:RichTextBox1
添加读取语句：RichTextBox1.LoadFile FileName
速度比较的快，方便简洁。然后让你的字符串变量为RichTextBox1.text就可以了。

 

参考自:http://zhidao.baidu.com/link?url=3RHbVfLlhLOeQFiza39GskqTaY3dKGOcqjgbnp3OmoFzjWYq5k8QxsGvjn6JNjbrvOrK-sma0jdI_4bxCqD0GK

Answer 2

input #1,stri追问

,stri什么意思

追答

。。。。变量啊。。。