VB.NET中怎么获取二进制图像,相信很多没有经验的人对此束手无策,为此本文总结了问题出现的原因和解决方法,通过这篇文章希望你能解决这个问题。
从 Byte() 中进行VB.NET二进制图像的获取
Public Function GetImage
FromStream
()Function GetImageFromStream
(ByVal ImageStream As Byte())
As Image
Me.mobjImage = Nothing
If (ImageStream Is Nothing)
Then
Return False
End If
Dim index As Integer = 0
If (((ImageStream(0) = &H15)
AndAlso (ImageStream(1) = &H1C))
AndAlso (ImageStream.Length
>= 80)) Then
index = &H4E
Do While (index < (ImageStream.
Length - 1))
If ((ImageStream(index) = &H42)
AndAlso (ImageStream((index +
1)) = &H4D)) Then
Exit Do
End If
index += 1
Loop
If ((ImageStream(index) <> &H42)
OrElse (ImageStream((index
+ 1)) <> &H4D)) Then
index = &H87
End If
End If
Try
Dim stream As New MemoryStream
(ImageStream, index,
(ImageStream.Length - index))
objImage = Drawing.Image.
FromStream(stream)
Catch obj1 As Exception
return nothing
End Try
Return objImage
End Function
看完上述内容,你们掌握VB.NET中怎么获取二进制图像的方法了吗?如果还想学到更多技能或想了解更多相关内容,欢迎关注天达云行业资讯频道,感谢各位的阅读!