北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |
涉及到打印问题
我有两个想法
1.自定义一个打印设置窗体,能设置一些常用打印参数,如横打、纵打,打印页数,黑白彩打,单双面
当然官网上的一些例子也能做到,但我感觉有点死 限于当前窗体 一些打印参数从当前窗体控件获得 方法上有点死(个人愚见)
但我想 任何想打印的窗体上 都能 有个 打印设置 按钮调出打印设置窗体 来设置 从而自定义来打印
暂时卡着 还没做出来
Application.Printer.Copies = Me.Text23
If Me.Frame9.Value = 1 Then
Application.Printer.Orientation = acPRORLandscape
Else
Application.Printer.Orientation = acPRORPortrait
End If
If Me.Frame25.Value = 1 Then
Application.Printer.ColorMode = acPRCMColor
Else
Application.Printer.ColorMode = acPRCMMonochrome
End If
Select Case Me.Frame31.Value
Case 2
Application.Printer.Duplex = acPRDPHorizontal
Case 1
Application.Printer.Duplex = acPRDPSimplex
Case 3
Application.Printer.Duplex = acPRDPVertical
End Select
还有默认打印机的设置 来给Application.Printer赋值 也不太清楚 Application.Printer 是默认的打印机 还是什么 有点糊涂了现在
之后 预览 打印的时候 就用Application.Printer的属性 从而打印出来
但实际操作不行 横打 什么的的都不行 好像 能设置默认的打印机 因为DoCmd.RunCommand acCmdPrint 调出来的时候 默认打印机 就换了我设置的
这是我一个思路
2.就是DoCmd.RunCommand acCmdPrint 调用出系统的打印设置界面
设置好后 单击确定就打印了 打印的是当前窗体 不知道是不是默认打印的是窗体 还是 后面能设置一些参数 资料查不到
当然 系统的打印 应该有记忆功能 比较好
这个思路 我就是不知道 怎么去 弄 也找不到例子去学习
还有的一个思路就是 设置公有变量 public prt as printer 之后设置 prt的相关属性 之后打印的时候 用这个的参数来打印
接触ac一个半月 对编程开发 也不理解 请高手指指道 谢谢