晨彦电脑科技 Belong to oneself's sky
RSS
Dec 16

vb.net 创建与读取文本文件的方法 不指定

雪糕先生 2010/12/16 不指定 13:24
下面是创建代码:
引用

        If File.Exists("C:\abc.txt") Then
            File.Delete("C:\abc.txt")
        End If
        Dim sr As StreamWriter = File.CreateText("C:\abc.txt")
        sr.Write("晨彦电脑科技")
        sr.WriteLine("WWW.BTOSS.COM")
        sr.Write("这是一个创建文本文件的例子")
        sr.Close()


下面是读取代码:
引用

        If File.Exists("C:\abc.txt") = False Then
            MsgBox("文件不存在!")
        Else
            Dim sr As StreamReader = File.OpenText("C:\abc.txt")
            Dim str As String = sr.ReadLine
            Dim i As Integer = 0
            While Not IsNothing(str)
                i = i + 1
                If i = 1 Then
                    Me.TextBox1.Text &= str
                Else
                    Me.TextBox1.Text &= "," + str
                End If

                str = sr.ReadLine
            End While
        End If
Actions
Tags:
 
VB VB.NET , 评论(4) , 引用(0) , 阅读(7095) , Via 本站原创
品质教程 Email Homepage
2010/12/25 09:23
学习了,真给力!
软件资讯 Email Homepage
2010/12/22 20:55
VB学习抽象不?
雪糕先生 回复于 2010/12/23 10:36
VB是最简单的语言了
软件资讯 Email Homepage
2010/12/22 20:55
VB学习抽象不?
duguyue100 Email Homepage
2010/12/16 15:56
东西看懂了,但弱弱的问一句,想干啥??饿~貌似是文件读取。。哦。。恍然大悟。。
分页: 1/1 第一页 1 最后页
发表评论

昵称

网址

电邮

打开HTML 打开UBB 打开表情 隐藏 记住我 [登入] [注册]

 
赞助商链接
热门Tags
统计