vb.net 教程 4-8 文本文件读写 1
2017-07-16 23:24
561 查看
上一节重点学习了文本的编码,本节开始学习文本文件的读写。
通常情况下,文件可以分为文本文件和二进制文件。
文本文件就是可以直接用记事本打开看到内容的文件,比如后缀为txt、htm、log等等。
其余的文件就是二进制文件,比如.exe、.dll、.mp3等等。
总的来说,文本文件读写相对二进制文件读写简单点。
通常的做法是建立一个与文件关联的filestream,然后使用StreamReader读取或者StreamWriter写入。
本节以及后面几节采用几种不同的方法来说明文本文件读写的方法。
注意的是,为了详细说明,采用的是读写方法对应的形式,并不是说A种读文件一定对应A种写文件,
A种读文件可以对应B种写文件的,在实际使用时,请怎么简单怎么用。
窗体设计界面如下:
同时请加入一个 OpenFileDialog控件和一个SaveFileDialog控件。
两个ComboBox中均在Item中加入:方法1至方法6。DropDownStyle为DropDownList。
由于涉及文件操作和文本编码,
请在窗体顶部 Public Class Form1 上面中加入代码:
窗体载入时,
代码中使用了With...End With,可以简化代码。
读取按钮按下时,根据cbRead的选项来选择读取的方法:
写入按钮按下时,根据cbWrite的选项来选择写入的方法:
学习更多vb.net知识,请参看 vb.net 教程 目录
通常情况下,文件可以分为文本文件和二进制文件。
文本文件就是可以直接用记事本打开看到内容的文件,比如后缀为txt、htm、log等等。
其余的文件就是二进制文件,比如.exe、.dll、.mp3等等。
总的来说,文本文件读写相对二进制文件读写简单点。
通常的做法是建立一个与文件关联的filestream,然后使用StreamReader读取或者StreamWriter写入。
本节以及后面几节采用几种不同的方法来说明文本文件读写的方法。
注意的是,为了详细说明,采用的是读写方法对应的形式,并不是说A种读文件一定对应A种写文件,
A种读文件可以对应B种写文件的,在实际使用时,请怎么简单怎么用。
窗体设计界面如下:
同时请加入一个 OpenFileDialog控件和一个SaveFileDialog控件。
两个ComboBox中均在Item中加入:方法1至方法6。DropDownStyle为DropDownList。
由于涉及文件操作和文本编码,
请在窗体顶部 Public Class Form1 上面中加入代码:
Imports System.IO Imports System.Text
窗体载入时,
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load With OpenFileDialog1 .Filter = "文本文件|*.txt" .FileName = "" .Multiselect = False End With SaveFileDialog1.Filter = "文本文件|*.txt" SaveFileDialog1.FileName = "" cbRead.SelectedIndex = 0 cbWrite.SelectedIndex = 0 End Sub
代码中使用了With...End With,可以简化代码。
读取按钮按下时,根据cbRead的选项来选择读取的方法:
Private Sub btnRead_Click(sender As Object, e As EventArgs) Handles btnRead.Click Dim FilePath As String If OpenFileDialog1.ShowDialog <> DialogResult.OK Then Exit Sub End If FilePath = OpenFileDialog1.FileName lblFilePath.Text = "读取文件:" & FilePath txtFile.Text = "" Select Case cbRead.SelectedIndex Case 0 Call readText1(FilePath) Case 1 Call readText2(FilePath) Case 2 Call readText3(FilePath) Case 3 Call readText4(FilePath) Case 4 Call readText5(FilePath) Case 5 Call readText6(FilePath) End Select End Sub
写入按钮按下时,根据cbWrite的选项来选择写入的方法:
Private Sub btnWrite_Click(sender As Object, e As EventArgs) Handles btnWrite.Click Dim FilePath As String If SaveFileDialog1.ShowDialog <> DialogResult.OK Then Exit Sub End If FilePath = SaveFileDialog1.FileName Select Case cbWrite.SelectedIndex Case 0 Call writeText1(FilePath) Case 1 Call writeText2(FilePath) Case 2 Call writeText3(FilePath) Case 3 Call writeText4(FilePath) Case 4 Call writeText5(FilePath) Case 5 Call writeText6(FilePath) End Select lblFilePath.Text = "写入文件:" & FilePath End Sub
学习更多vb.net知识,请参看 vb.net 教程 目录
相关文章推荐
- vb.net 教程 4-8 文本文件读写 2
- vb.net 教程 4-8 文本文件读写 3
- vb.net 教程 4-8 文本文件读写 4
- vb.net 教程 4-8 文本文件读写 5
- vb.net 教程 4-7 文本文件编码 1
- vb.net 教程 4-7 文本文件编码 2
- VB.NET 读写文本文件,终于有点明白了
- VB.NET读写文本文件方法
- [VB.NET]求个读写文本文件的思路
- vb.net 教程 4-9 二进制文件读写 1
- vb.net 教程 4-9 二进制文件读写 2
- vb.net 教程 4-9 二进制文件读写 3
- vb.net读写文本文件简单示例
- vb.net 教程 4-9 二进制文件读写 游戏存档修改器
- vb.net 教程 1-10 List 2
- vb.net 教程 5-13 图像处理之像素处理 7
- vb.net 教程 5-10 Graphics类 2
- vb.net 教程 2-5 流程控制:循环语句 Do...Loop 2
- vb.net 教程 11-1 打印组件 4 PrintDocument 2
- [VB.NET]初学者教程003