VB.NET读写文本文件方法
2008-12-24 15:44
381 查看
作者:ll_efort 发布时间:2008-08-11 09:00:24 来源:网络
工作需要,小编需要使用vb.net对文本文件进行读写操作。编程需要完成如下工作:Q8s源码网
1、把程序执行错误追加到错误日志中Q8s源码网
2、使巧巧读书网的编辑能够读取错误日志Q8s源码网
记得以前使用vb6.0的时候,对文本文件的操作挺麻烦的,特别是在写文件的时候,需要区分什么顺序文件、随机文件,很教材都专门针对文本文件的读写开辟了一个章节来讲解,够麻烦的了。现在使用.net读写文本文件,因为时间仓促,没来得及细看MSDN,同时受到6.0的思路影响,把问题复杂化了,在追加记录到文本文件尾部的时候就写不下去了,后来仔细看了一下MSDN中例子,问题终于得到了解决。Q8s源码网
好了下面进入正题,分别把VB.NET中对文本文件进行读和写的通用操作做个示例,免得后来新手多走弯路。Q8s源码网
我们这里是对文件流进行操作,所以模块前面要加上:Q8s源码网
Imports System.IOQ8s源码网
1、写操作:Q8s源码网
使用System.IO的StreamWriter,下面是代码:Q8s源码网
Dim strFilePath As String = SaveFileDialog1.FileNameQ8s源码网
Dim sw As StreamWriter = New StreamWriter(strFilePath, True)'true是指以追加的方式打开指定文件Q8s源码网
For i = 0 To jQ8s源码网
temp = i.ToStringQ8s源码网
sw.WriteLine(temp)Q8s源码网
sw.Flush()Q8s源码网
NextQ8s源码网
sw.Close()Q8s源码网
sw = NothingQ8s源码网
首先要说明的是构造函数new Q8s源码网
Public Sub New(path, append, Encoding)Q8s源码网
path:要打开文件的完整路径,如果文件不存在则自动建立一个新的文件。Q8s源码网
append:缺省值为false,指示是否以追加方式打开指定文件。false--如果存在path指定的文件,则覆盖原文件,否则建立一个新文件;true---如果存在path指定的文件,则打开该文件,以追加数据的方式在文尾写数据,否则建立一个新文件。Q8s源码网
Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码写文件。Q8s源码网
WriterLine(str):在文本中添加一个新行,同时在行尾加上回车换行符Q8s源码网
2、读操作Q8s源码网
Dim line As StringQ8s源码网
Dim sr As StreamReader = New StreamReader(strPath, System.Text.Encoding.Default)Q8s源码网
Do While sr.Peek() > 0Q8s源码网
line = sr.ReadLine()Q8s源码网
LoopQ8s源码网
sr.Close()Q8s源码网
sr = NothingQ8s源码网
Q8s源码网
构造函数new Q8s源码网
Public Sub New(Path, Encoding)Q8s源码网
path:要打开文件的完整路径,如果文件抛出一个错误。Q8s源码网
Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码读文件。Q8s源码网
到这里就把VB.NET里对文本文件的读写操作示例讲解完了,其实.net中对文件的读写还有其它的办法,这里讲的只是最实用的办法,其它的有待读者进一步研究!Q8s源码网
工作需要,小编需要使用vb.net对文本文件进行读写操作。编程需要完成如下工作:Q8s源码网
1、把程序执行错误追加到错误日志中Q8s源码网
2、使巧巧读书网的编辑能够读取错误日志Q8s源码网
记得以前使用vb6.0的时候,对文本文件的操作挺麻烦的,特别是在写文件的时候,需要区分什么顺序文件、随机文件,很教材都专门针对文本文件的读写开辟了一个章节来讲解,够麻烦的了。现在使用.net读写文本文件,因为时间仓促,没来得及细看MSDN,同时受到6.0的思路影响,把问题复杂化了,在追加记录到文本文件尾部的时候就写不下去了,后来仔细看了一下MSDN中例子,问题终于得到了解决。Q8s源码网
好了下面进入正题,分别把VB.NET中对文本文件进行读和写的通用操作做个示例,免得后来新手多走弯路。Q8s源码网
我们这里是对文件流进行操作,所以模块前面要加上:Q8s源码网
Imports System.IOQ8s源码网
1、写操作:Q8s源码网
使用System.IO的StreamWriter,下面是代码:Q8s源码网
Dim strFilePath As String = SaveFileDialog1.FileNameQ8s源码网
Dim sw As StreamWriter = New StreamWriter(strFilePath, True)'true是指以追加的方式打开指定文件Q8s源码网
For i = 0 To jQ8s源码网
temp = i.ToStringQ8s源码网
sw.WriteLine(temp)Q8s源码网
sw.Flush()Q8s源码网
NextQ8s源码网
sw.Close()Q8s源码网
sw = NothingQ8s源码网
首先要说明的是构造函数new Q8s源码网
Public Sub New(path, append, Encoding)Q8s源码网
path:要打开文件的完整路径,如果文件不存在则自动建立一个新的文件。Q8s源码网
append:缺省值为false,指示是否以追加方式打开指定文件。false--如果存在path指定的文件,则覆盖原文件,否则建立一个新文件;true---如果存在path指定的文件,则打开该文件,以追加数据的方式在文尾写数据,否则建立一个新文件。Q8s源码网
Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码写文件。Q8s源码网
WriterLine(str):在文本中添加一个新行,同时在行尾加上回车换行符Q8s源码网
2、读操作Q8s源码网
Dim line As StringQ8s源码网
Dim sr As StreamReader = New StreamReader(strPath, System.Text.Encoding.Default)Q8s源码网
Do While sr.Peek() > 0Q8s源码网
line = sr.ReadLine()Q8s源码网
LoopQ8s源码网
sr.Close()Q8s源码网
sr = NothingQ8s源码网
Q8s源码网
构造函数new Q8s源码网
Public Sub New(Path, Encoding)Q8s源码网
path:要打开文件的完整路径,如果文件抛出一个错误。Q8s源码网
Encoding:缺省值为System.Text.Encoding.Default,即使用系统缺省的编码,指示以什么样的编码读文件。Q8s源码网
到这里就把VB.NET里对文本文件的读写操作示例讲解完了,其实.net中对文件的读写还有其它的办法,这里讲的只是最实用的办法,其它的有待读者进一步研究!Q8s源码网
相关文章推荐
- vb.net 教程 4-8 文本文件读写 2
- vb.net读写文本文件简单示例
- vb.net 教程 4-8 文本文件读写 5
- [VB.NET]求个读写文本文件的思路
- c#.net与vb.net中读写Cookie的方法!
- vb.net 读写xml方法(1)(原创)
- VB.NET 读写文本文件,终于有点明白了
- vb.net 教程 4-8 文本文件读写 1
- vb.net 教程 4-8 文本文件读写 3
- c#.net与vb.net中读写Cookie的方法!
- VB.net读写二进制数据方法
- vb.net 教程 4-8 文本文件读写 4
- vb.net 读写xml方法(1)
- VB.NET中MD5加密的方法
- 这么详细的分类 VB/VB.NET源代码网站你见过没有? VB/VB.NET中的每一个方法,每一个操作,每一个函数,每一个类.每一个属性,每一个事件都有相应的范例代码
- 在VB.NET里操作文本文件
- Mozilla / Firefox / Gecko in VB.NET,geckofx 1.9 vb.net中使用方法
- vb.net grid激活行或激活单元格的index取得方法
- 为什么VB.net的Shared(共享)方法在C#中叫Static(静态)?
- Asp.Net读写XML简单方法