成都网站建设设计

将想法与焦点和您一起共享

包含vb.net循环读txt的词条

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

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

成都创新互联公司-专业网站定制、快速模板网站建设、高性价比郴州网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式郴州网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖郴州地区。费用合理售后完善,十年实体公司更值得信赖。

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

End Using

请教在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.net 如果读取txt数据(或十进制dat数据)

vb.net虽也有input语句,但一次只能读取到一个变量中,可以用TextFieldParser类代替,但似乎没以前的方便。不过比以前的更灵活。写入文件Write还是可以用,在Microsoft.VisualBasic.FileIO中。

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

Dim fileName As String = "E:\User Documents\Master\My Documents\电子阅读\股票\table2.csv"

Using Recrods As New Microsoft.VisualBasic.FileIO.TextFieldParser(fileName) '建立TextFieldParser对象

'MyReader.TextFieldType = FieldType.Delimited

Recrods.SetDelimiters(",") '把字段分隔符设置为","

Dim curRow() As String

Do Until Recrods.EndOfData

curRow = Recrods.ReadFields() '读取记录行,返回字符串数组,所以不同字段类型需要自己转换。

Debug.Print(Join(curRow, vbTab))

Loop

End Using

End Sub

vb.net 循环读取文件问题

先用StreamWriter一行行的循环读取到一个字符串中利用split(',')取得2个数字,将2个数字和文本框进行比对即可


名称栏目:包含vb.net循环读txt的词条
文章网址:http://chengdu.cdxwcx.cn/article/ddciedj.html