我设计了一窗体 加个按钮,按钮 click 事件代码如下
If CurrentTable IsNot Nothing Then CurrentTable.Print(True, False)End If
这样的话 当前表就打印出来了,而且标题 页眉等都可以在代码里设置,
我这样设置了
With CurrentTable.PrintInfo.title="XXXX单位通讯录".PageHeader="***" .PaperKind = 0 '纸张类型设为自定义 .PaperWidth = 250 '宽度设为250毫米 .PaperHeight = 120 '高度设为120毫米End WithCurrentTable.Print(True,False) '打印预览
非常成功 ,用不着再在菜单里设置了,现在的问题是:
标题 页眉 页脚都有左中右的,具体代码 狐爸能不能提供一下