vb点虐 保存为txt的简单介绍

请教在VB点虐 中如何将数据写入txt文件、再从txt文件读出?

软糖来告诉你吧。

网站设计制作过程拒绝使用模板建站;使用PHP+MYSQL原生开发可交付网站源代码;符合网站优化排名的后台管理系统;网站设计制作、网站设计收费合理;免费进行网站备案等企业网站建设一条龙服务.我们是一家持续稳定运营了十年的创新互联网站建设公司。

VB点虐 中读写文件主要使用System.IO命名空间。

① 使用 File.ReadAllText 读取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 读取,注意编码格式和写入的编码保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

③ 使用 File.WriteAllText 写入,会覆盖同名的文件。

Dim 要写的内容 As String = ""

File.WriteAllText(文件路径, 要写的内容, System.Text.Encoding.UTF8)

④ 使用 StreamWriter 写入。

Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)

sw.WriteLine(TextTB.Text)

sw.Close()

⑤ 使用 StreamWriter 追加写入。

将上面代码的第二个参数False改为True。

◆ 满意请采纳,谢谢 ◆

vb点虐 保存成TXT文件后再从RICHTEXTBOX里打开为什么是乱码?

你保存跟读取的格式不一致:这样就可以

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

OpenFileDialog1.FileName = ""

OpenFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"

OpenFileDialog1.ShowDialog()

If OpenFileDialog1.FileName "" Then

RichTextBox1.Text = IO.File.ReadAllText(OpenFileDialog1.FileName)

End If

End Sub

【vb点虐 】怎么把text里面的内容生成一个txt文件

Dim SaveFileDialog1 As New SaveFileDialog()

'创建一个保存对话框

SaveFileDialog1.Filter = "txt files (*.txt)|*.txt"

'设置

扩展名

If SaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

'如果确定保存

My.Computer.

FileSystem

.WriteAllText(SaveFileDialog1.Filename, Textbox1.Text,False)

'保存文本,False表示不追加文本,直接覆盖其内容

End If

vb点虐 中 datagridview的数据如何保存到 txt

Dim i As Integer

Dim j As Integer

Dim myFile As New System.IO.StreamWriter("c:\Test.txt")

Dim strTemp As String = ""

For j = 0 To frmQuery.DataGridView1.RowCount - 1

strTemp = ""

For i = 0 To frmQuery.DataGridView1.Columns.Count - 1

strTemp = "'" frmQuery.DataGridView1(i, j).Value "'" ","

Next

myFile.WriteLine(strTemp)

Next

myFile.Close()

格式为表格每行保存为文本文件的一行,字段之间以逗号分隔。

新闻名称:vb点虐 保存为txt的简单介绍
文章网址:https://www.cdcxhl.com/article12/ddeocgc.html

成都网站建设公司_创新互联,为您提供网页设计公司网站改版定制开发网站营销手机网站建设面包屑导航

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联

成都app开发公司