Question

vb.net 二进制读取文件

我把文件读到一个字节数组里了
然后怎么把它转换为UTF8编码的字符串呢？
比如怎么把Bytes()转到Str中呢
vb6中好像可以直接用str=strconv(Bytes,.....)
但是vb.net中好像不行了

Answer 1

VB.NET打开二进制文件用fileopen完成，打开二进制文件的形式为：openmode.binary
读取二进制文件用的是fileget方法，写入二进制文件用的是fileput方法。
应用示例：将一批随机数保存在一个dat文件中，然后再将其提取到文本框中。
二进制文件的读写一批随机数的存取，程序为：
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x, i, fn As Integer
Dim s As String = ""
fn = FreeFile()
FileOpen(fn, "d:\data.dat", OpenMode.Binary)
For i = 1 To 8
x = Int(Rnd() * 100)
s = s + Str(x)
FilePut(fn, x)
Next
FileClose(fn)
TextBox1.Text = s
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim x, fn As Integer
Dim s As String = ""
fn = FreeFile()
FileOpen(fn, "d:\data.dat", OpenMode.Binary)
Do While Not EOF(fn)
FileGet(fn, x)
s = s + Str(x) + " "
Loop
FileClose(fn)
TextBox1.Text = s
End Sub

Answer 2

我把文件读到一个字节数组里了

dim s as string ="vb.net 二进制读取文件"
dim buff as byte()=system.text.encoding.utf8.getbytes(s)'这个就是utf8编码的byte数组。
然后把buff写入文件就行了。

把utf8编码的文件读取到byte数组数据，可以用system.text.encoding.utf8.getstring(buff)即可转换为字符串。

Answer 3

dim s as string ="vb.net 二进制读取文件"
dim buff as byte()=system.text.encoding.utf8.getbytes(s)'这个就是utf8编码的byte数组。
然后把buff写入文件就行了。

把utf8编码的文件读取到byte数组数据，可以用system.text.encoding.utf8.getstring(buff)即可转换为字符串。