Visual Basic Classic
--
Questions
--
Followers
Top Experts
ÿØÿâñãYÔãxð±"=©t«Ôc3ÚaIõÉ416!¦ó~xÇJ ÇüÔÔûÍI¬þiy¡+âæÜ~û})½D8`
+"éÏO!?¿¥æ>{'ST,vºµ$À²§sñQK#!êM7 È9¶G<
¹f~fOÄSÝ./J)B$Ö<`@&ϯJ\Ð19Í!lÑp[t,=EmXÚ}¹ÿ&4¿Û¥5"/îZÞØù|Í'É÷=ê¥ïú"
;`ñW¨ÚeçÚôØ%cûÅ]þðâ¥Ó
8k`ÅØxëOE,ÜdÕ Øè¬âò!üG©«KËzÑÖðìþt²«FJ䨡5gY
̤sRQ}h¸ÇE1öÅ-4´¬/Ó¥
Here is the code vb.net uses to decode the file. Is there a way to do this vb6?
'this converting is not necessary
' you can just set break here and see what data you're receiving
Dim str2 As String = encoding.GetString(bytes2)
' read jpeg data
Dim bytesFrame(lenFrame) As Byte
len1 = 0
Do While len1 < lenFrame
len1 = len1 + Stream.Read(bytesFrame, len1, lenFrame - len1)
Loop
'convert data do image
Dim imageStream As MemoryStream = New MemoryStream(bytesFrame)
imageStream.Position = 0
Dim img As Image = New Bitmap(imageStream)
'display
PictureBox1.Image = img
PictureBox1.Refresh()
Zero AI Policy
We believe in human intelligence. Our moderation policy strictly prohibits the use of LLM content in our Q&A threads.
http://www.c-sharpcorner.com/Forums/ShowMessages.aspx?ThreadID=43966
FileName = "C:\Path\..\mypic.jpg"
Open FileName For Binary as #1
Put #1, , StreamData
Close #1
Picture1.Picture = LoadPicture(FileName)






EARN REWARDS FOR ASKING, ANSWERING, AND MORE.
Earn free swag for participating on the platform.
Visual Basic Classic
--
Questions
--
Followers
Top Experts
Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.