Vb.net PrintWriter什么都不打印

Question

我正在vb.net中开发一个应用程序。输出形式如下所示。它有一个PRINT按钮来打印表单中的组件。我的意思是当我点击打印按钮时它应该打印整个表格。我在PRINT按钮上编写了以下代码

PrintDialog1.Document = PrintDocument1
    Dim result As DialogResult = PrintDialog1.ShowDialog
    If (result = DialogResult.OK) Then
        PrintDocument1.Print()
End If

但问题是它不打印表格。相反，它会打印一个空白页面。

有人可以说我的代码中有什么错误，以及如何像上面的图像一样打印页面。提前致谢

Answer 1

最后，我找到了解决方案

不使用PrintDialog和PrintDocument，而是使用PrintForm控件。

，代码应为

On Error GoTo handler
    PrintForm1.Print()
    Exit Sub
handler:
    MsgBox("error")

现在我的问题已修复。

Answer 2

第1步：将命名空间导入为             Imports System.Drawing.Printing

第2阶段：在视觉基础上使用PowerBox并使用ToolBox中的“PrintForm”工具。

第3步：创建一个按钮并双击它并复制以下代码

         PrintForm1.PrintAction = PrintAction.PrintToPreview
         PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.FullWindow)