用PrintForm方法即可打印:因为你的表肯定是显示在一个窗体上的,代码如下:
CmdPrint1_Click()'CmdPrint1 is a CommandButton
Dim msg
On Error Goto ErrorHandler
PrintForm
Exit Sub
ErrorHandler:
msg="Sorry ,Form Can't Print!"
msgbox msg
resume Next
End Sub
CmdPrint1_Click()'CmdPrint1 is a CommandButton
Dim msg
On Error Goto ErrorHandler
PrintForm
Exit Sub
ErrorHandler:
msg="Sorry ,Form Can't Print!"
msgbox msg
resume Next
End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货