新建From1（窗体），新建Command1（按钮CommandButton），代码：

manongku.txt的数据（两行abc后有个回车，123后没有）：

用16进制软件打开看下manongku.txt到manongku4.txt的运行结果：

可以看到VB6 非二进制写入会多个vbCrLf（0D 0A）。

lngA 那两行可以把一些文件尾部很多 00 00 ... 00 都抛弃。