Dim Dir_orig As String = File.DirAssets
Dim Filename_orig As String = "original_bitmap.jpg"
Dim Dir_dest As String = File.DirRootExternal
Dim Filename_dest As String = "modified_bitmap.jpg"
Dim btmp_orig As Bitmap
btmp_orig.Initialize( Dir_orig, Filename_orig )
Dim btmp_m As Bitmap
btmp_m.InitializeMutable( btmp_orig.Width, btmp_orig.Height ) ' 1:1 scale
Dim cv As Canvas
cv.Initialize2( btmp_m )
Dim Rect1 As Rect
Rect1.Initialize( 0, 0, btmp_m.Width, btmp_m.Height )
cv.DrawBitmap( btmp_orig, Null, Rect1 )
' ...
' Now draw whatever you want with the canvas
' ...
' Save
Dim o As OutputStream
o=File.OpenOutput( Dir_dest, Filename_dest,False)
cv.Bitmap.WriteToStream(o,100,"JPEG") 'or "PNG"
o.Close