<p> 工作需要,小编需要使用vb.net对文本文件进行读写操作。编程需要完成如下工作:</p><p> 1、把程序执行错误追加到错误日志中</p><p> 2、使巧巧读书网的编辑能够读取错误日志</p><p> 记得以前使用vb6.0的时候,对文本文件的操作挺麻烦的,特别是在写文件的时候,需要区分什么顺序文件、随机文件,很教材都专门针对文本文件的读写开辟了一个章节来讲解,够麻烦的了。现在使用。net读写文本文件,因为时间仓促,没来得及细看MSDN,同时受到6.0的思路影响,把问题复杂化了,在追加记录到文本文件尾部的时候就写不下去了,后来仔细看了一下MSDN中例子,问题终于得到了解决。</p><p> 好了下面进入正题,分别把vb.net中对文本文件进行读和写的通用操作做个示例,免得后来新手多走弯路。</p><p> 我们这里是对文件流进行操作,所以模块前面要加上:</p><p> Imports System.IO</p><p> 1、写操作:</p><p> 使用System.IO的StreamWriter,下面是代码:</p><p> Dim strFilePath As String = SaveFileDialog1.FileName</p><p> Dim sw As StreamWriter = New StreamWriter(strFilePath, True)'true是指以追加的方式打开指定文件</p><p> For i = 0 To j</p><p> temp = i.ToString</p><p> sw.WriteLine(temp)</p><p> sw.Flush()</p><p> Next</p><p> sw.Close()</p><p> sw = Nothing</p><p> 首先要说明的是构造函数new</p><p> Public Sub New(path, append, Encoding)</p><p> path:要打开文件的完整路径,如果文件不存在则自动建立一个新的文件。</p><p> append:缺省值为false,指示是否以追加方式打开指定文件。false——如果存在path指定的文件,则覆盖原文件,否则建立一个新文件;true——如果存在path指定的文件,则打开该文件,以追加数据的方式在文尾写数据,否则建立一个新文件。</p><p> Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码写文件。</p><p> WriterLine(str):在文本中添加一个新行,同时在行尾加上回车换行符</p><p> 2、读操作</p><p> Dim line As String</p><p> Dim sr As StreamReader = New StreamReader(strPath, System.Text.Encoding.Default)</p><p> Do While sr.Peek() > 0</p><p> line = sr.ReadLine()</p><p> Loop</p><p> sr.Close()</p><p> sr = Nothing</p><p> 构造函数new</p><p> Public Sub New(Path, Encoding)</p><p> path:要打开文件的完整路径,如果文件抛出一个错误。</p><p> Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码读文件。</p><p> 到这里就把vb.net里对文本文件的读写操作示例讲解完了,其实。net中对文件的读写还有其它的办法,这里讲的只是最实用的办法,其它的有待读者进一步研究!</p>