这个此腔是由于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就可以了。
6是错误代码,溢出是错误内容。给你提供一些常见的错误代码:3 :无 GoSub 返回
4 :应用程序定义或对象定义错误
5 :无效的过程调用或参数
6 :溢出
7 :内存溢出
9 :下标越界
11 :除数为零
13 :类型不匹配
14 :字符串空间溢出
16 :表达式太复拦咐杂
17 :不能执行所需简瞎纯的 *** 作
18 :出现用户中断
47 :DLL 应用程序客户太多
48 :加载 DLL 错误
49 :DLL 调用约定错误
52 :错误的文件名或号码
53 :文件未找到
54 :文件模式错误
55 :文件已打开
56 :应用程序定义或对象定义神散错误
57 :设备 I/O 错误
58 :文件已存在
59 :记录长度错误
60 :应用程序定义或对象定义错误
61 :磁盘已满
62 :输入超出文件尾
63 :记录号错误
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)