专家坐堂-BitConverter.ToString后，怎么根据内容转换回数组Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  BitConverter.ToString后，怎么根据内容转换回数组  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91296)

--  作者：zwjfx
--  发布时间：2016/10/7 10:57:00
--  BitConverter.ToString后，怎么根据内容转换回数组

Dim fs As New IO.FileStream("D:\\te.jpg" , IO.FileMode.Open , IO.FileAccess.Read) \'用文件流打开图片
Dim br As New IO.BinaryReader(fs) \'根据文件流,申明一个二进制阅读器
Dim ImageByte() As Byte = br.ReadBytes(fs.Length) \'阅读器读取文件流,并将独到的二进制放入数组ImageByte中,
Dim ImageString As String = BitConverter.ToString(imageByte).Replace("-", "") \' SQLCommand 不能直接Insert 二进制,只能拼接SQL语句,所以这里把二进制变成字符
Output.show(ImageString)
得到这个后要怎么转换回来？
Dim zimageByte() As Byte = BitConverter.GetBytes(ImageString)？？？？？？
好像也不对

--  作者：有点蓝
--  发布时间：2016/10/7 11:29:00
--

Dim fs As New IO.FileStream("F:\\hyphen\\Pictures\\QQ图片20160921213959.jpg" , IO.FileMode.Open , IO.FileAccess.Read) \'用文件流打开图片
Dim br As New IO.BinaryReader(fs) \'根据文件流,申明一个二进制阅读器
Dim ImageByte() As Byte = br.ReadBytes(fs.Length) \'阅读器读取文件流,并将独到的二进制放入数组ImageByte中,
Dim ImageString As String = Convert.ToBase64String(imageByte) \' SQLCommand 不能直接Insert 二进制,只能拼接SQL语句,所以这里把二进制变成字符
Output.show(ImageString)

Dim zimageByte() As Byte = Convert.FromBase64String(ImageString)
Dim image As Image = Image.FromStream(New IO.MemoryStream(zimageByte))
e.Form.Controls("PictureBox1").image = image