VB输入超出文件尾是什么意思? 为什么?

行 14: Input(1, no)
行 15: Input(1, name)
行 16: Input(1, mima)--输入超出文件尾
行 17: If no = txtUserName.Text Then
行 18: flag1 = True

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就可以了。
温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-04-12
有可能是你文件的格式错误,VB中只能调用由它本身write写出来的文件,其它形式的文件无法辨别文件尾
第2个回答  2019-06-22
发现也可以将文件内容读到vb内的text控件内,在将相应的text控件的内容转读到变量上面(text作转存),这样就不用麻烦的设置了
第3个回答  2011-04-01
if not eof(1) then
第4个回答  2011-03-31
还是要结合上下文来看,这几行代码没有明白具体的作用。
相似回答