我试了,可以调出图片了
但是还有个问题,可能是狐表不兼容 VB.NET语句造成的
问题就是,当二进制列为空值时,用VB.NET的语句无法判断(在VB.NET里是可能正常使用的)
烦请狐爸爸帮我看看呢,这个怎么处理呀,这个急呀,因为数据库是既有的数据库,不能改人家的数据库呀
Dim dt As DataTable=cmd.executereader
If Trim(dt.dataRows(0)("xx_front").ToString) = "" Then '现在在这里没办法判断,不管数据列是否为空,这里得到的都不是空值
Return
End If
Dim imageByte() As Byte = dt.DataRows(0)("xx_front") '所以不管值是否为空,都会执行到这里,而到这里就会提示出错
messagebox.Show (imageByte.length)
If imageByte.length > 0 Then
Dim ms As New IO.MemoryStream(imageByte) '将字节数组转换为二进制流
Dim image As Image = Image.FromStream(ms) '将二进制流转换为图片
Forms(frmname).Controls("PictureBox1").image = image '显示图片
End If
出错提示为:
索引超出了数组界限(无法插入图片)