用户名: 用QQ登录本站
密 码: 注册
验证码:
首页 软件 编程 笑话 知识 公告 日历 计算器 行情 简化版
文明驾车我带头,文明行路我带头,礼貌让座我带头      

[公益] 节省一分零钱 献出一份爱心 温暖世间真情      
广告位招租中
2021年 劳动节 12
2021年 端午节 56
2022年 元 旦 257
2022年 春 节 288
 
  • 您现在的位置:首页 >> 办公软件 >> 内容

    access设置报表的打印页边距

    内容摘要: 用TopMargin 与 LeftMargin、RightMargin 和 BottomMargin属性起指定打印页的边距。其中因为单位为 缇(Twips),1cm= 567 TwipsPrivate Sub 设置_Click()'没有设置页边距或页边距设置错误时出错On Error GoTo Err DoCmd.OpenReport '报表1', acVi......

      用TopMargin 与 LeftMargin、RightMargin 和 BottomMargin属性起指定打印页的边距。


    其中因为单位为 缇(Twips),1cm= 567 Twips


    Private Sub 设置_Click()

    '没有设置页边距或页边距设置错误时出错

    On Error GoTo Err


    DoCmd.OpenReport "报表1", acViewPreview

    '设置报表“报表1”上边距

    Reports("报表1").Printer.TopMargin = 上 * 56.7

    '设置报表“报表1”下边距

    Reports("报表1").Printer.BottomMargin = 下 * 56.7

    '设置报表“报表1”左边距

    Reports("报表1").Printer.LeftMargin = 左 * 56.7

    '设置报表报表1”右边距

    Reports("报表1").Printer.RightMargin = 右 * 56.7

    If 0 Then

    Err:

    '出错时打开错误提示

    MsgBox "页边距没有设置完整或设置错误!"

    End If

    End Sub

      版权声明:本内容来源于互联网,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。


    发布日期:2021/2/3 发布时间:16:23:54 点击:655 录入:齐天大圣
  • 上一篇:Excel工作簿中获取已使用的工作表的个数
  • 下一篇:Excel会计运转现金收支月报表
  • 本类新增
    本类热门文章
    Baidu

    YiJiaCMS V5.01 Build 21.03.31(MSSQL) 闽ICP备05000814号-1
    本空间由景安网络提供,百度云加速提供加速防护
    齐天大圣® 制 作 ©2000-2021