vb.nettxt流的简单介绍

2010VB.net 如何一直读取TXT文档最后一行信息,麻烦给个代码,谢谢

首先在代码的开头引入命名空间：

Imports?System.IO

给出三个读文本文件的例子.

'直接读取所有文本

Dim?fileString?As?String?=?File.ReadAllText("1.txt")

'把所有行弄进一个数组

Dim?fileLines()?As?String?=?File.ReadAllLines("1.txt")

'以流的方式一行一行读取

Using?fs?As?FileStream?=?File.OpenRead("1.txt")?'初始化文件流

Using?sr?As?New?StreamReader(fs)?'初始化流读取器

Dim?lineString?As?String?=?""

While?Not?sr.EndOfStream?'循环直到流结束

lineString?=?sr.ReadLine()?'读一行

'这里lineString就是每行的文件内容了.

'你可以今天这一节对它进行处理.

End?While

End?Using

怎样用vb.net读取本地.txt文件?

imports System.IO

读取指定文件

'

'读取指定文本文件

Public Function readtext(ByVal path As String)

If path = "" Then

readtext = "操作失败！"

Exit Function

End If

Try

If File.Exists(path) = True Then

Dim fs As New FileStream(path, FileMode.Open)

Dim sr As New StreamReader(fs)

Dim str As String

str = sr.ReadToEnd.ToString

sr.Close()

fs.Close()

readtext = str

Else

Catch ex As Exception

End Try

End Function

'向指定文件写入数据

Public Function writetext(ByVal path As String, ByVal opi As Integer, ByVal msg As String)

writetext = "操作失败！"

Dim op As FileMode

Select Case opi

Case 1

op = FileMode.Append

op = FileMode.Create

Case Else

End Select

Dim fs As New FileStream(path, op)

Dim sr As New StreamWriter(fs)

sr.WriteLine(msg)

writetext = "操作完成！"

参考这个吧

'vb.net源代码来自

如何用vb.net编写读取txt内容的代码?

代码如下：

'写文本文件

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

'创建(写入)一个文本文件

Dim MyStream As New System.IO.FileStream(Application.StartupPath "\Ssk.txt", System.IO.FileMode.Create)

Dim MyWriter As New System.IO.StreamWriter(MyStream, System.Text.Encoding.Default)

MyWriter.WriteLine(TextBox1.Text)

MyWriter.Flush()

MyWriter.Close()

MyStream.Close()

End Sub

'读文本文件

'读取一个文本文件

MyReader.Close()

气斜射入水或其他介质,折射光线与入射光线法线在

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

软糖来告诉你吧.

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

① 使用 File.ReadAllText 读取

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

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

Dim s As String = sr.ReadToEnd()

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

Dim 要写的内容 As String = ""

④ 使用 StreamWriter 写入.

sw.WriteLine(TextTB.Text)

sw.Close()

⑤ 使用 StreamWriter 追加写入.

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

+ 满意请采纳,谢谢 +

以上就是土嘎嘎小编为大家整理的vb.nettxt流的简单介绍vb.nettxt流的简单介绍相关咨询咨询主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！