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

2025-03-05 00:08:13

推荐回答（2个）

回答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

回答2：

input #1,stri