设计一个窗口,添加一个名为textBox1的System.Windows.Forms.TextBox,
创新互联主营镇沅网站建设的网络公司,主营网站建设方案,成都app开发,镇沅h5微信小程序搭建,镇沅网站营销推广欢迎镇沅等地区企业咨询
添加一个名为button1的System.Windows.Forms.Button。
为button1的单击事件添加如下处理函数:
Sub Button1Click(sender As Object, e As EventArgs)
'f是你的文本文件的文件名
Const f As String="t.txt"
Dim sw As System.IO.StreamWriter=Nothing
Try
If Not System.IO.File.Exists(f) Then
sw=System.IO.File.CreateText(f)
Else
sw=New System.IO.StreamWriter(f,True)
End If
sw.WriteLine(textBox1.Text)
Finally
If sw IsNot Nothing Then
sw.close()
End If
End Try
End Sub
用StreamReader和StreamWriter读写文本文件,在读取的过程中判断字符串即可。
'创建一个文本文件,把文本框里的文字写入到该文件,当然,你可以使用一个字符串变量
Dim MyStream As New System.IO.FileStream("D:\test.ini", 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()
文章名称:vb点虐
新建文本文件 vbnet新建文件夹
链接分享:https://www.cdcxhl.com/article10/ddiogdo.html
成都网站建设公司_创新互联,为您提供小程序开发、静态网站、移动网站建设、做网站、ChatGPT、云服务器
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联