用以将 Form 对象的图象逐位发送给打印机。语法 object.PrintFormobject 所在处代表一个对象表达式,其值为“应用于”列表中的一个对象。如果省略 object,则带有焦点的 Form 对象缺省为 object。说明 PrintForm 将打印 Form 对象的全部可见对象和位图。在绘制图形时,如果 AutoRedraw 属性为 True,则在运行时PrintForm 将打印 Form 对象或 PictureBox 控件上的图形。PrintForm 所使用的打印机是由操作系统的控制面板中的设置来决定。PrintForm 方法示例 本示例使用 PrintForm 方法打印当前窗体。要检验此示例,可将本例代码粘贴到一个窗体的声明部分。在窗体上放置任何在打印出来的窗体上想要看到的控件,然后按 F5 键并单击该窗体。Private Sub Form_Click () Dim Msg ' 声明变量。 On Error GoTo ErrorHandler ' 设置错误处理程序。 PrintForm ' 打印窗体。 Exit Sub ErrorHandler: Msg = "The form can't be printed." MsgBox Msg ' 显示信息。 Resume Next End Sub摘自 《MSDN》
printform
用以将 Form 对象的图象逐位发送给打印机。语法
object.PrintFormobject 所在处代表一个对象表达式,其值为“应用于”列表中的一个对象。如果省略 object,则带有焦点的 Form 对象缺省为 object。说明
PrintForm 将打印 Form 对象的全部可见对象和位图。在绘制图形时,如果 AutoRedraw 属性为 True,则在运行时PrintForm 将打印 Form 对象或 PictureBox 控件上的图形。PrintForm 所使用的打印机是由操作系统的控制面板中的设置来决定。PrintForm 方法示例
本示例使用 PrintForm 方法打印当前窗体。要检验此示例,可将本例代码粘贴到一个窗体的声明部分。在窗体上放置任何在打印出来的窗体上想要看到的控件,然后按 F5 键并单击该窗体。Private Sub Form_Click ()
Dim Msg ' 声明变量。
On Error GoTo ErrorHandler ' 设置错误处理程序。
PrintForm ' 打印窗体。
Exit Sub
ErrorHandler:
Msg = "The form can't be printed."
MsgBox Msg ' 显示信息。
Resume Next
End Sub摘自 《MSDN》