Vb.net print code in a form

Private Sub buttonPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs)

    Dim printDialog1 As PrintDialog = New PrintDialog

    printDialog1.Document = printDocument1

    Dim result As DialogResult = printDialog1.ShowDialog

    If (result = DialogResult.OK) Then

        printDocument1.Print()

    End If

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 

    Handles Button1.Click

    PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.Scrollable)

End Sub

Saranya Boopathi