主题：怎么截取字节串

转成字符啊

转成字符串，截取；

或者，字符串截取完，转成字节。

Dim txt As String = "你好"
Dim zj() As Byte = System.Text.Encoding.Default.GetBytes(txt)
Dim zjtemp() As Byte = {zj(2), zj(3)}
Dim nc As String = System.Text.Encoding.Default.GetString(zjtemp)
msgbox(nc)

不理解你的意思，字符和字节的转换，看这里，怎么用，是你自己的问题。

Dim zj() As Byte = System.Text.Encoding.Default.GetBytes(txt)

Dim nc As String = System.Text.Encoding.Default.GetString(zj)

截取两个字节，好字

Dim zjtemp() As Byte = {zj(2), zj(3)}

截取两个字节，好字

Dim zjtemp() As Byte = {zj(2), zj(3)}

比如，从第15个位置开始截取。

Dim zjtemp(19) As Byte
For i As Integer = 0 To zjtemp.length
    zjtemp(i) = zj(i+15)
Next