itRef.cn技术参考网站

当前位置: 主页 > windows > vb >

vb.net使用StreamReader一行一行读写文件

时间:2012-02-25 19:25来源:未知 作者:wiwi 点击:
如果要需要一行一行读写程序,就需要使用StreamReader类,需要导入命名空间: Imports System.IO 一行一行读取文件代码: Private Sub Button1_Click( ByVal sender As System. Object , ByVal e As System.EventArgs) Handles Button1.Click Me .ListBox1.It
如果要需要一行一行读写程序,就需要使用StreamReader类,需要导入命名空间:
Imports System.IO

一行一行读取文件代码:
  1. Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles Button1.Click  
  2.         Me.ListBox1.Items.Clear()  
  3.         Dim StrRed As StreamReader = New StreamReader("D:\111.txt", System.Text.Encoding.Default)  
  4.  
  5.         While Not StrRed.EndOfStream  
  6.             Me.ListBox1.Items.Add(StrRed.ReadLine())  
  7.         End While 
  8.         StrRed.Dispose()  
  9.  
  10. End Sub 

一行一行写入文件代码:
  1. Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles Button2.Click  
  2.         Dim strR As New StreamWriter("D:\111.txt"True)'参数True表示在原来的数据上面添加,如果为False这删除原来的数据 重新写入数据    
  3.         strR.WriteLine(Me.TextBox2.Text)    
  4.         strR.Dispose()    
  5. End Sub  


(责任编辑:wiwi) 转载请注明 来源于itRef.cn技术参考网站:
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
栏目列表
推荐内容