如何将已有的txt格式的文件数据导入VB.NET程序中，（也就是在VB.NET中读取所需的txt文

一个按钮，一个文本框，把文本框设置成多行显示。

成都创新互联于2013年开始，先为鼓楼等服务建站，鼓楼等地企业，进行企业商务咨询服务。为鼓楼企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

代码如下：

Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim r As New StreamReader(Application.StartupPath "\ABC.txt", System.Text.Encoding.Default) '用StreamReader打开文本文件

Dim s As String

TextBox1.Text = ""

Do While r.Peek -1 '是否到文件尾

s = r.ReadLine '从打开的文件中读取一行内容

TextBox1.Text = TextBox1.Text s vbCrLf '添加到文本框TextBox1.Text的后面并回车

Loop

r.Close() '关闭对象

End Sub

End Class

VB.net 2008 如何以二进制的方式向文本文件中追加一个回车符

解决了，把 fr.Write(vbCrLf) 改成 fr.Write(CByte(vbCrLf))即可。

牛，为使用二进制的程序员鼓掌！

从来没用过的人问：为什么要用二进制啊，有啥好处？

VB.net在原数据库内容的基础上追加新字段并对新字段进行赋值

ALTER TABLE TABLE_Name ADD columnName varchar(30) '新增字段

ALTER TABLE TABLE_Name ADD columnName1 varchar(30) '新增字段

INSERT INTO TABLE_Name(columnName,columnName1)VALUES(columnName,columnName1) ‘插入新行，只给新字段赋值

vb.net 怎么写入和多行读取txt文件，而且多次写如之前的不被覆盖？

.net应该提供了此类函数。如C#就有File.AppendAllText(filename,string)用于追加内容，File.ReadAllLine(filename)用于读取多行。

请教在VB.net中如何将数据写入txt文件、再从txt文件读出？

软糖来告诉你吧。

VB.net中读写文件主要使用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.nettxt追加的简单介绍
分享链接：http://scyanting.com/article/hhphoe.html