VB.NET 读写文本文件，终于有点明白了

发布时间：2020-12-17 07:57:52 所属栏目：百科来源：网络整理

导读：以前vb6的读写老写错，进入vb2010终于有些明白了。好，正戏开场：主演： my.computer.filesystem system.io.streamReader system.io.streamWriter 配角：OpenFileDialog SaveFileDialog 剧情一般都是OpenFileDialog或SaveFileDialog跟龙套，提供路径和文件

以前vb6的读写老写错，进入vb2010终于有些明白了。好，正戏开场：
主演： my.computer.filesystem
system.io.streamReader
system.io.streamWriter
配角：OpenFileDialog
SaveFileDialog
剧情一般都是OpenFileDialog或SaveFileDialog跟龙套，提供路径和文件名后，由主演们操作。
先调戏一下，，小演一下：

[vb] 
   view plain 
   copy 
   print 
   ? 
    
   
 PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
 IfOpenFileDialog1.showdialog=DialogResult.OKThen
 My.Computer.FileSystem.WriteAllText(OpenFileDialog1.FileName,TextBox1.Text,False)
 EndIf
 EndSub

my命名空间具有快速访问特性，常见的：
my.computer 当前（本地）计算机硬件、软件、文件信息。
my.application 当前应用程序的信息：标题、目录、版本号。
my.forms 当前项目窗体信息
my.resources 应用程序资源的相关信息（只读），允许用户动态获取应用程序的资源。
my.setting 应用程序设置的相关程序。存储或设置
my.user 当前机器上激活的用户信息
my.webservices 当前机器激活的WEB服务信息，也可用于访问新的WEB服务器。
比如：my.user.name 当前机器上的用户名
my.computer.clock.location 当前机器上的当地日期与时间
正式调戏：
对于my

?

My.Computer.FileSystem.ReadAllText(OpenFileDialog1.FileName,System.Text.ASCIIEncoding.Default)

My.Computer.FileSystem.WriteAllText(OpenFileDialog1.FileName,False)

注1：读时，容易乱码，加上后面参数部分
注2：写时false表示不追加，即覆盖式写入。

对于streamRead,StreamWriter

?

ImportsSystem.IO

DimRTAsStreamReader
RT=NewStreamReader(OpenFileDialog1.FileName,System.Text.ASCIIEncoding.Default)
TextBox1.Text=RT.ReadToEnd()'读取全部
Textbox1.Text=RT.ReadLine()'一行一行读，常配合do循环
RT.Close()
DimWTAsStreamWriter
WT=NewStreamWriter(SaveFileDialog1.FileName,False,System.Text.ASCIIEncoding.Default)'非追加式写入
WT.WriteLine(TextBox1.Text)‘一行一行地写入
WT.Write(TextBox1.Text)'字串流写入
WT.Close()

可以看出stream强大，my有限制，但my更快捷。
其实这两个主演有时假戏真做，常有“沟通”

?

DimWTAsStreamWriter

WT=My.Computer.FileSystem.OpenTextFileWriter(SaveFileDialog1.FileName,False,85); line-height:18px"> '或：
RT=My.Computer.FileSystem.OpenTextFileReader(OpenFileDialog1.FileName,System.Text.ASCIIEncoding.Default)

这样沟通后，steam就站上台前，my就退居幕后了。
广告：
textbox1.select(0,0) 表示光标具文本框首，不选择任何文本，第一个0表示选择的起始位置，第二个0表示选择的终点位置。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!