Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

自定义打印设置窗体 或者 调用系统打印界面

麥稥  发表于:2012-03-15 14:44:55  
复制

涉及到打印问题

我有两个想法

    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一个半月 对编程开发 也不理解 请高手指指道  谢谢

 

 

 

 

Top
方鸿亮 发表于:2012-03-15 14:49:54
好像上不了图 。。 就是简单的打印参数设置控件

方鸿亮 发表于:2012-03-16 08:35:46

就这么沉了?

help me



羽扇子君 发表于:2012-03-16 08:57:51

直接 自定义 报表的 快捷菜单,把系统的 页面设置 和 打印... 命令放上,即可.

这部分根本不需要添加代码的



方鸿亮 发表于:2012-03-16 15:04:46

我的是07版本的 貌似搞不了 快捷菜单

你的意思就是 在 报表 界面 右击 弹出 快捷菜单 弹出 系统的 页码设置 和打印 命令 

能不能贴一点代码 



总记录:4篇  页次:1/1 9 1 :