Dim pdf As PdfDocument
pdf.Initialize
pdf.StartPage(595, 842) 'A4 size
Dim Bitmap2 As Bitmap=WebViewProcedimento.CaptureBitmap
Dim DestRect2 As Rect
DestRect2.Initialize(15dip, 15dip, 250dip, 300dip)
pdf.Canvas.DrawBitmap(Bitmap2, Null, DestRect2) 'draws the bitmap to the destination rectangle.
pdf.FinishPage