彩票走势图

使用GdPicture.NET图像处理控件控件，可以导出PDF文件并进行处理，比如可以在现有的PDF文件中添加一张新的A4纸，并在这张新的PDF页中画图，代码示例如下：

         Dim oGdPicturePDF As New GdPicturePDF
         Dim oGdPictureImaging As New GdPictureImaging
   
   
         Dim ImageID As Integer = oGdPictureImaging.CreateGdPictureImageFromFile("c:\test.tif")
   
         If ImageID > 0 AndAlso oGdPicturePDF.LoadFromFile("c:\test.pdf", True) = GdPictureStatus.OK Then
   
            'Add the image as resource in the PDF document
            Dim image_res_name As String = oGdPicturePDF.AddImageFromGdPictureImage(ImageID, False, False)
            oGdPictureImaging.ReleaseGdPictureImage(ImageID)
   
            'Insert a new blank A4 page as second page of the document.
            Dim pageWidth As Single = 8.27
            Dim pageHeight As Single = 11.69
            Dim pagePosition As Integer = 2
            oGdPicturePDF.SetOrigin(PdfOrigin.PdfOriginBottomLeft)
            oGdPicturePDF.SetMeasurementUnit(PdfMeasurementUnit.PdfMeasurementUnitInch)
            oGdPicturePDF.InsertPage(pageWidth, pageHeight, pagePosition)
            oGdPicturePDF.SelectPage(pagePosition)
            'Draw the image on the PDF page
            oGdPicturePDF.DrawImage(image_res_name, 0, 0, pageWidth, pageHeight)
            oGdPicturePDF.SaveToFileInc("c:\test.pdf")
            oGdPicturePDF.CloseDocument()
   
         End If