打印窗体不显示解决方法

Private Function PrintReceiptFormat(ByVal printer As String) As Boolean
        Dim iCtr As Integer
        Try
            Dim pd As New PrintDocument()
            AddHandler pd.PrintPage, AddressOf Pd_PrintPage
            pd.PrinterSettings.PrinterName = printer
            If pd.PrinterSettings.IsValid Then
                PrintReceiptFormat = True
                pd.Print()
            Else
                PrintReceiptFormat = False
            End If
        Catch
            PrintReceiptFormat = False
        End Try
    End Function
Private Sub Pd_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs)

end sub

  dim   PrintStandard   as   PrintController=new   StandardPrintController(）   
  printdocument1.PrintController=PrintStandard   
  printdocument1.print()