使用打印窗体Me.PrintForm,将整个窗体打印出来余笑.
若要打印文本内容,需要编写打印代码,涉及字体、字号、打印位置等.参考下列代码修改：
Private Sub Command1_Click()
txt = "记录号"
dd = prnt(X, Y, fnt, txt)
txt = "干箱温度"
txt = "捕水温度1"
txt = "制品温度1"
txt = "干箱真空"
txt = "捕水真空"
数卖 dd = prnt(X, Y, fnt, txt)
End Sub
Public Function prnt(X As Variant, Y 竖毕含As Variant, fnt As Variant, txt0 As Variant)
Printer.CurrentX = X
Printer.CurrentY = Y
Printer.FontSize = fnt
Printer.Print txt0
End Function
CommonDialog控件提供一组标准的操作对话框,进行诸如打开和保存文件,设置打印选项,以及选缺姿择颜色和字体等操作.通友扮雀过运行好早 Windows 帮助引擎控件还能显示帮助.
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用，就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！