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

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

读写文本文件,终于有点明白了
以前vb6的读写老写错,进入vb2010终于有些明白了。

好,正戏开场:
主演: puter.filesystem
system.io.streamReader
system.io.streamWriter
配角:OpenFileDialog
SaveFileDialog
剧情一般都是OpenFileDialog或SaveFileDialog跟龙套,提供路径和文件名后,由主演们操作。

先调戏一下,,小演一下:
[vb] view plaincopyprint?
1.Private Sub Button1_Click(ByVal sender As System.Objec t, ByVal e As System.EventArgs) Handles Button1.Click
2.If OpenFileDialog1.showdialog = DialogResult.OK Then
puter.FileSystem.WriteAllText(OpenFileDialog1.Fil eName, TextBox1.T ext, False)
4.End If
5.End Sub
my命名空间具有快速访问特性,常见的:
puter 当前(本地)计算机硬件、软件、文件信息。

my.application 当前应用程序的信息:标题、目录、版本号。

my.forms 当前项目窗体信息
my.resources 应用程序资源的相关信息(只读),允许用户动态获取应用程序的资源。

my.setting 应用程序设置的相关程序。

存储或设置
er 当前机器上激活的用户信息
my.webservices 当前机器激活的WEB服务信息,也可用于访问新的WEB服务器。

比如: 当前机器上的用户名
puter.clock.location 当前机器上的当地日期与时间
正式调戏:
对于my
[vb] view plaincopyprint?
puter.FileSystem.ReadAllText(OpenFileDialog1.File Name, System.Text.ASCIIEncoding.Default)
puter.FileSystem.WriteAllText(OpenFileDialog1.Fil eName, TextBox1.T ext, False)
注1:读时,容易乱码,加上后面参数部分
注2:写时false表示不追加,即覆盖式写入。

对于streamRead,StreamWriter
[vb] view plaincopyprint?
1.Imports System.IO
2.
3.Dim RT As StreamReader
4.RT = New StreamReader(OpenFileDialog1.FileName, Syst em.Text.ASCIIEncoding.Default)
5.TextBox1.Text = RT.ReadToEnd() '读取全部
6.Textbox1.Text=RT.ReadLine() '一行一行读,常配合do循环
7.RT.Close()
8.
9.
10.
11.
12.Dim WT As StreamWriter
13.WT = New StreamWriter(SaveFileDialog1.FileName, F
alse, System.Text.ASCIIEncoding.Default) '非追加式写入
14.WT.WriteLine(TextBox1.Text) ‘一行一行地写入
15.WT.Write(TextBox1.Text) '字串流写入
16.WT.Close()
可以看出stream强大,my有限制,但my更快捷。

其实这两个主演有时假戏真做,常有“沟通”
[vb] view plaincopyprint?
1.Dim WT As StreamWriter
2.WT = puter.FileSystem.OpenT extFileWriter(SaveFil eDialog1.FileName, False, System.Text.ASCIIEncoding.Default)
3.
4.'或:
5.Dim RT As StreamReader
6.RT = puter.FileSystem.OpenT extFileReader(OpenF ileDialog1.FileName, System.Text.ASCIIEncoding.Default) 这样沟通后,steam就站上台前,my就退居幕后了。

广告:
textbox1.select(0,0) 表示光标具文本框首,不选择任何文本,第一个0表示选择的起始位置,第二个0表示选择的终点位置。

相关文档
最新文档