VBNET逐行读写文本文件

本人利用VB.NET中FileOpen()函数编写对文本文件的逐行写入和逐行读取的小程序，而且写的文本没有双引号，很实用的

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\
     目录           0  2018-04-10 23:50  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\
     文件          44  2018-04-10 23:50  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\Newtest.txt
     文件       23040  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\WindowsApplication1.exe
     文件       46592  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\WindowsApplication1.pdb
     文件       11600  2018-04-10 23:50  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\WindowsApplication1.vshost.exe
     文件         708  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Debug\WindowsApplication1.xml
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\bin\Release\
     文件        3465  2018-04-10 23:52  VB.Net逐行读取写入文本文件\WindowsApplication1\Form1.Designer.vb
     文件        5817  2018-04-10 23:52  VB.Net逐行读取写入文本文件\WindowsApplication1\Form1.resx
     文件         988  2018-04-10 23:52  VB.Net逐行读取写入文本文件\WindowsApplication1\Form1.vb
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\
     文件        1523  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Application.Designer.vb
     文件         510  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Application.myapp
     文件        1117  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\AssemblyInfo.vb
     文件        2790  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Resources.Designer.vb
     文件        5612  2010-05-04 06:45  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Resources.resx
     文件        3017  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Settings.Designer.vb
     文件         279  2010-05-04 06:45  VB.Net逐行读取写入文本文件\WindowsApplication1\My Project\Settings.settings
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\
     目录           0  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\
     文件        2867  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\DesignTimeResolveAssemblyReferences.cache
     文件        6401  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\DesignTimeResolveAssemblyReferencesInput.cache
     目录           0  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\TempPE\
     文件        7680  2018-04-10 23:42  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\TempPE\My Project.Resources.Designer.vb.dll
     文件       23040  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\WindowsApplication1.exe
     文件         180  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Form1.resources
     文件       46592  2018-04-10 23:47  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\WindowsApplication1.pdb
     文件         180  2018-04-10 23:46  VB.Net逐行读取写入文本文件\WindowsApplication1\obj\x86\Debug\WindowsApplication1.Resources.resources
............此处省略8个文件信息