PictureBox1.Image.Save("NewFileName.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)
Dim oFile As System.IO.FileInfo = New System.IO.FileInfo("NewFileName.jpg")
Dim numBytes As Long = oFile.Length
Dim fStream As New FileStream("NewFileName.jpg", FileMode.Open, FileAccess.Read)
Dim br As New BinaryReader(fStream)
Dim data As String = br.ReadInt32() + br.ReadInt32()
br.Close()
Dim SP As System.IO.Ports.SerialPort
SP = New System.IO.Ports.SerialPort("COM7:")
SP.Write(data)
SP.WriteLine("12321423423")
SP.WriteLine("PRINT")
SP.Close()