主题：请看下，汉字出错的问题？

Dim s As string = FileSys.ReadAllText("d:\ChkOutU1.txt",System.Text.Encoding.Default)

你把第一句改成这个看看

楼主，用lxl版主提供的方法。
我另一贴提供的方法，不够这个好。

我试试！

此主题相关图片如下：33.gif

遇到有汉字行会出现以上提示错误。

用lxl版主提供的方法。取汉字的值已OK了，可substring按长度取值时，又遇到问题了，当是汉字行时，出现上面图示错误呀。

当然了：
NF116255 的length 是8 
Q全额无 的length 是4

也就是遇到汉字行的时候 就没有你预期的166个字符

啊，其实文本文件中是固定长度，不足是以空格填补的。那怎么办呀？

你的txt文件是怎么出来的。
怎么不用tab符做为列分割符号？

哦，是采集器自动产生的。是固定了格式的，无法更改了。有无其它办法解决，请各位帮忙！

刚看了 你钢号里面也带有空格，所以用空格Split的方法泡汤了。

问一下：是不是只有“出库单号”才会出现汉字? 如果是，那就好说。