01.PictureBox1.Image.Save("NewFileName.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
02.
03. Dim oFile As System.IO.FileInfo = New System.IO.FileInfo("NewFileName.jpg")
04. Dim numBytes As Long = oFile.Length
05.
06. Dim fStream As New FileStream("NewFileName.jpg", FileMode.Open, FileAccess.Read)
07. Dim br As New BinaryReader(fStream)
08. Dim data As String = br.ReadInt32() + br.ReadInt32()
09. br.Close()
10.
11.
12. Dim SP As System.IO.Ports.SerialPort
13. SP = New System.IO.Ports.SerialPort("COM7:")
14. SP.Write(data)
15.
16. SP.WriteLine("12321423423")
17. SP.WriteLine("PRINT")
18. SP.Close()
