دستورات کدنویسی فایلهای PDF - فراخوانی / ویرایش / حذف / چاپ

[SilverGold]

سلام به همه دوستان
من یک مشکلی دارم اون هم این هست که می خوام از تابع O2S.Components.PDFView4NET.Printing
تو همین برنامه خودم بتونم پرینت بگیرم یا ویرایش کنم
Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Drawing.Printing
Imports System.IO.File
Imports O2S.Components.PDFView4NET
Imports O2S.Components.PDFView4NET.Printing


Public Class Form1

Private pdfFile As PDFFile
Private currentPage As Integer

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim w As Int64
w = PdfDocument2.PageCount
PdfPageView1.PageNumber = w - 1
TextBox1.Text = PdfPageView1.PageNumber.ToString
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PdfPageView1.PageNumber = 0
TextBox1.Text = 1
End Sub


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'
PdfDocument2.FilePath = (Application.StartupPath & "\Kord.pdf")
TextBox1.Text = (PdfPageView1.PageNumber + 1).ToString
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
If PdfPageView1.PageNumber < PdfDocument2.PageCount - 1 Then
PdfPageView1.PageNumber += 1
TextBox1.Text = (PdfPageView1.PageNumber + 1).ToString
End If
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If PdfPageView1.PageNumber > 0 Then
PdfPageView1.PageNumber -= 1
TextBox1.Text = (PdfPageView1.PageNumber + 1).ToString
End If
End Sub
Private Sub BtnZoomUp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnZoomUp.Click
If Me.PdfPageView1.Zoom < 300 Then PdfPageView1.Zoom += 10
End Sub
Private Sub BtnZoomDown_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnZoomDown.Click
If Me.PdfPageView1.Zoom > 10 Then PdfPageView1.Zoom -= 10
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Me.FolderBrowserDialog1.ShowDialog()
LblPathPicture.Text = Me.FolderBrowserDialog1.SelectedPath.ToString
End Sub
ممنون میشم اگه کسی کمکم کنه من تا همین جا تونستم پیش برم
برای چاپ و ویرایش مشکل دارم