Dim out As OutputStream
out = File.OpenOutput(File.DirRootExternal, "3.jpg", False)
c.Bitmap.WriteToStream(out, 100, "JPEG")
out.Close
Dim NewBitmap1 As Bitmap
NewBitmap1.Initialize(File.DirRootExternal, "3.jpg")
Panel2.SetBackgroundImage(NewBitmap1)
'ImageView1.SetBackgroundImage(NewBitmap1)
ImageView1.Bitmap = LoadBitmap(File.DirRootExternal, "3.jpg")