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)) Thenindex = &H4E
Do While (index < (ImageStream.
Length - 1))If ((ImageStream(index) = &H42)
AndAlso (ImageStream((index +
1)) = &H4D)) ThenExit Do
End If
index += 1
Loop
If ((ImageStream(index) <> &H42)
OrElse (ImageStream((index
+ 1)) <> &H4D)) Thenindex = &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中怎么获取二进制图像的方法了吗?如果还想学到更多技能或想了解更多相关内容,欢迎关注亿速云行业资讯频道,感谢各位的阅读!
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。