VB输入超出文件尾是什么意思? 为什么?
行14:Input(1,no)行15:Input(1,name)行16:Input(1,mima)--输入超出文件尾行17:Ifno=txtUserName.TextTh...
行 14: Input(1, no)
行 15: Input(1, name)
行 16: Input(1, mima)--输入超出文件尾
行 17: If no = txtUserName.Text Then
行 18: flag1 = True 展开
行 15: Input(1, name)
行 16: Input(1, mima)--输入超出文件尾
行 17: If no = txtUserName.Text Then
行 18: flag1 = True 展开
5个回答
展开全部
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就可以了。
这个是由于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就可以了。
展开全部
有可能是你文件的格式错误,VB中只能调用由它本身write写出来的文件,其它形式的文件无法辨别文件尾
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
发现也可以将文件内容读到vb内的text控件内,在将相应的text控件的内容转读到变量上面(text作转存),这样就不用麻烦的设置了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
if not eof(1) then
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
还是要结合上下文来看,这几行代码没有明白具体的作用。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询