Question

VB.net读取TXT文本，然后添加到listBox，为什么不和原来TXT内容一致？

Dim str As IO.StreamReader = New IO.StreamReader("E:\map.txt", System.Text.Encoding.Default)
Do Until str.EndOfStream
listbox1.items.add(str.ReadLine())
Loop
str.Close()

就在在一个button下写的，然后运行后。。就出现了listbox的内容不和TXT一样，比如TXT的第一行是___________000,但listbox第一行就是_________000000000，还有比如TXT里面有5个255，而listbox里只找到2个。不懂为什么

求大侠指教
如果可以，告诉我错在哪？还有如果这样的读取没用，VB.net还有什么办法读取文件

Answer 1

你的代码没错 错的很可能是你的文件
你用str.readline这个是按 cr lf 分行的 在vb.net里面是vbcrlf
你的文件有可能是单cr 或者单lf分行的
你可以试试改下文件
如果不行 你可以试试这样
Dim str As IO.StreamReader = New IO.StreamReader("E:\map.txt", System.Text.Encoding.Default)
dim ts as string() = str.readtoend.split(chr(10)) '如果chr(10)不行可以换chr(13)
listbox.items.AddRange(ts)
str.Close()