>>872 で愚痴って終わりなのもアレだから一応書いとく

・事象
　FileSystemObject.TextStream.ReadLine と ADODB.Stream.ReadText(adReadLine) が同じ結果にならない

・原因
　改行コードが CRLF と LF が混じったお行儀のよろしくないファイルだった

・対処
　LineSeparator = adLF として Replace(ReadText(adReadLine), vbCr, "")
　とやったらOKだった