以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]byte字节数组与string的相互装换  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60896)

--  作者:zwjfx
--  发布时间:2014/12/3 14:34:00
--  [求助]byte字节数组与string的相互装换
dim r as string = "foxtable"

Dim k(1024) As Byte

我想请教大神的是,如何把r的值存入k中

--  作者:有点甜
--  发布时间:2014/12/3 14:36:00
--  

Dim str As String = "abc中A国8就"
Dim zj() As Byte = System.Text.Encoding.Default.GetBytes(str)
msgbox(zj.length)


--  作者:jialihaha
--  发布时间:2014/12/3 14:39:00
--  

[此贴子已经被作者于2014-12-3 14:39:44编辑过]

--  作者:zwjfx
--  发布时间:2014/12/3 15:01:00
--  
Dim str As String = "abc中A国8就"
Dim zj() As Byte = System.Text.Encoding.Default.GetBytes(str)
For i As Integer = 0 To zj.length - 1
    Output.show(zj(i))
Next
麻烦再问一下,这个要怎么转换为字符呢,就是还原回来,感谢!

--  作者:有点甜
--  发布时间:2014/12/3 15:11:00
--  

Dim txt As String = "你好"
Dim zj() As Byte = System.Text.Encoding.Default.GetBytes(txt)
Dim nc As String = System.Text.Encoding.Default.GetString(zj)
msgbox(nc)


--  作者:zwjfx
--  发布时间:2014/12/3 15:16:00
--  
谢谢图片点击可在新窗口打开查看