vb.net读写文本 vb读取文本

VB.net 读取文本文件?1、实现上传按钮方法代码 。
2、判断图片对象是否为空代码 。
3、取得数据库字段 dt.Rows(0)("Pic")方法代码 。
4、字节数组转换为Image类型方法代码 。
5、处理SQL中操作Image类型方法代码 。
6、实现的上传结果 。
vb.net中,读取和写入文件写入vb.net读写文本:Dim sr As New IO.StreamWriter(Application.StartupPath"/写入vb.net读写文本的文本.txt")
sr.WriteLine("写入vb.net读写文本的内容")sr.Close()读取vb.net读写文本:If (File.Exists(Application.StartupPath"/msg.txt")) Then
Dim fm As New IO.FileStream(Application.StartupPath"/读取的文本.txt", FileMode.Open)
Dim sr As IO.StreamReader = New IO.StreamReader(fm)
Do While sr.Peek() = 0
TextBox1.Text = sr.ReadLine()(读取文本到文本框)
Loopend if
请教在VB.net中如何将数据写入txt文件、再从txt文件读出?软糖来告诉vb.net读写文本你吧 。
VB.net中读写文件主要使用System.IO命名空间 。
① 使用 File.ReadAllText 读取
Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 读取vb.net读写文本 , 注意编码格式和写入的编码保持一致 。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
③ 使用 File.WriteAllText 写入vb.net读写文本,会覆盖同名的文件 。
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 读写Unicode编码的文本不要用do until,用for:
Dim arr() As String, i As Integer
arr = Split(r.ReadLine, " ")
For i = LBound(arr) To UBound(arr)
MsgBox(arr(i))
Next
--------------------
还是用readline,如果你要提取两个非连续空格之间的字符串,可以用
Dim arr() As String
arr = Split(r.ReadLine, " ")
arr()数组里就存了你要的单词 。
快要下班了,明后天不上班,如果16:30之前还搞不定就要下个星期1了 。
----------------------------------
哈 , 是我的失误没想到还有可能有半角的日文 。
用utf-8就OK了 , 代码如下:
(文本文件存的时候不能存成ansi,要存成utf-8,或是Unicode)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim r As System.IO.StreamReader
r = New System.IO.StreamReader("c:\a.txt", System.Text.Encoding.GetEncoding("utf-8"))
Do While Not r.EndOfStream
MsgBox(r.ReadLine)
Loop
End Sub
【vb.net读写文本 vb读取文本】关于vb.net读写文本和vb读取文本的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

    推荐阅读