断行符号的问题

wube 发布于 2015-06-15 17:01， 918 次点击

1.VB要如何读取(Ascii Code)断行符号为10而不是10+13的格式档案
2.VB要如何读取档案(Ascii Code)前先判别档案格式为10或10+13

5 回复

风吹过b2015-06-15 17:19

文档大不大？不大，按下面的方式读：
一次性读入内存。
如：
    Open App.Path & "\表达式.txt" For Binary As #1
        rs = StrConv(InputB$(LOF(1), #1), vbUnicode)
    Close #1

去掉 Chr(13)
rs = Replace(rs, chr(13), "")
按 chr(10)分行
fj=split(rs,chr(10))

然后 fj() 这个数组得到的就是这个文本的每一行。
不需要特意去区分 chr(10) 和 chr(10)+chr(13) 的分行文件。

风吹过b2015-06-15 17:20

如果文件很大，那就只能按块读一次读多少字节的文件，然后按上面处理，然后再操作。
操作完了当前块，再继续下一块的处理。

wube2015-06-15 18:14

VB能否再开档前判断档案格式是正常的还是特殊的断行吗?

风吹过b2015-06-15 18:46

必须要读档才能知道，可以按字节读，然后判断，也可以按块读，然后判断。块读建议 4k 一块。

wube2015-06-17 18:06

用C读取很正常,试试来搞个DLL回传字串...

只有本站会员才能查看附件，请登录