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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → BitConverter.ToString后，怎么根据内容转换回数组

共有2056人关注过本帖树形打印复制链接主题：BitConverter.ToString后，怎么根据内容转换回数组

zwjfx

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：146 积分：2622 威望：0 精华：0 注册：2014/3/18 12:20:00

BitConverter.ToString后，怎么根据内容转换回数组 发帖心情

Post By：2016/10/7 10:57:00 [只看该作者]

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)？？？？？？

好像也不对

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110551 积分：562645 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：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

主题：BitConverter.ToString后，怎么根据内容转换回数组