vb.net文件续写 vbnet filestream

vb.net 里怎样才能只写入一行到指定文件里

！！)IfboolThenMessageBox.Show(数据已写入)ElseMessageBox.Show(写入数据时出错)EndIfEndSub'FilePath为文件路径'Str要写入的内容PublicFunctionwirte(ByValFilePathAsString,ByValStrAsString)AsBooleanDimsrAsStreamReaderDimswAsStreamWriterTrysr=NewStreamReader(FilePath)DimoldStrAsString=sr.ReadToEnd()sr.Close()sw=NewStreamWriter(FilePath)'判断以前的文本是否有记录IfoldStr.Length0Then'写入以前的数据sw.WriteLine(oldStr)EndIf'在文件尾部添加新的内容sw.Write(Str)sw.Close()ReturnTrueCatchexAsExceptionReturnFalseFinallyIfsrIsNotNothingThensr.Close()EndIfIfswIsNotNothingThensw.Close()EndIfEndTryEndFunctionEndClass

相关问答

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

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

Q2: 请教在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。

◆ 满意请采纳，谢谢 ◆

Q3: vb.net 中如何进行文件的读写

一般来讲asp.net的服务器运行应用所用的账号只有对应用所在目录(放网页的目录)的访问权限，你可以把文件存储在应用所在目录或者子目录试试。

My.Computer.FileSystem.WriteAllText(Server.MapPath("") “\" Now.toString("yyyyMMdd") ".txt", "URL：XXXXXX查询完成，匹配成功！" vbCrLf, true, System.Text.Encoding.Default)

Q4: vb.net怎么往已经建立好的dat文件里写东西，还不覆盖原本的数据？

如果想继续编辑之前的文档，在TXT文件尾部继续添加文本，那么还需要在函数后边加个参数。

VB 代码

方法1：

      Dim sw As StreamWriter = New StreamWriter("C:\temp\test.txt")

      sw.Write("abc"  vbCrLf)

sw.Close()

Dim sw2 As StreamWriter = New StreamWriter("C:\temp\test.txt", True)

sw2.Write("456"  vbCrLf)

sw2.Close()

方法2：

      My.Computer.FileSystem.WriteAllText("test.txt", "This is test Text", True)

方法3：

      System.IO.File.AppendAllText("c:\temp\test.txt", "this is extra test file")

详见：“网页链接” 

Q5: vb.net中，读取和写入文件

写入：Dim sr As New IO.StreamWriter(Application.StartupPath "/写入的文本.txt")

sr.WriteLine("写入的内容") sr.Close()读取：If (File.Exists(Application.StartupPath "/msg.txt")) Then

Dim fm As New IO.FileStream(Application.StartupPath "/读取的文本.txt", FileMode.Open)

Dim sr As IO.StreamReader = New IO.StreamReader(fm)

Do While sr.Peek() = 0

TextBox1.Text = sr.ReadLine() （读取文本到文本框）

Loop end if

关于vb.net文件续写和vbnet filestream的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。