请稍后...

首页 > 正文(ACCESS数据库中的中文报表制作)

ACCESS数据库中的中文报表制作

时间:2019-1-30 23:13:19 来源: 作者:

数据库应用中很关键的数据输出形式是“报表”,

ACCESS提供的报表向导,只针对国外的报表形式,就是线条较少的报表。

而我们的中文报表,传统形式是线条较多的网格形式,

所以,不能简单地通过向导来完成。

现就本人使用ACCESS的经验,结合实例,谈一下如何在ACCESS数据库中制作我们的中文报表。   

---- “产品销售利润明细表”的制作:   

---- 1. 新建报表:选“自动报表:表格”,数据来源选表如XSLR表,确定后,产生一个简单的报表,在此基础上进行修改。   

 

---- 2. 页面设置:边距方面,调整靠左、靠右来达到最大打印范围。页面方面,打印方向设置为纵向,纸张大小选自定义大小,

宽度为1660(最大),长度为1100(一页纸长度),单位为0.01英寸。   

 

---- 3. 版面设置:删除报表页眉、报表页脚。将页面页眉的内容删除。在页面页眉中插入对象,

选MICROSOFT WORD文档,在WORD文档中画出表头,填上内容,注意,汉字之间要空一格,

否则,到ACCESS报表输出时,汉字会出现乱码。对此OLE控件设置属性:背景样式为“透明”,边框样式为“透明”。

在主体部件插入对象,选MICROSOFT WORD文档,在WORD文档中画出表格线方格,行宽可比表头行宽大一些,

对此OLE控件设置属性:背景样式为“透明”,边框为实线,边框宽度为细线,设置各字段文字类型及大小,将各字段调整到方格内。  

---- 4. 在DETAIL的FORMAT事件中写入代码,以完成对零值的屏蔽。代码如下:(A3至A13为数值型字段)   

Private Sub Detail_Format   (Cancel As Integer, FormatCount As Integer)   

If A3 = 0 Then   A3.Visible = False   

Else   A3.Visible = True   

End If   

If A4 = 0 Then   A4.Visible = False   

Else   A4.Visible = True   

End If   

If A7 = 0 Then   A7.Visible = False   

Else   A7.Visible = True   

End If   

If A8 = 0 Then   A8.Visible = False   

Else   A8.Visible = True   

End If   

If A9 = 0 Then   A9.Visible = False   

Else   A9.Visible = True   

End If   

If A11 = 0 Then   A11.Visible = False   

Else   A11.Visible = True   

End If   

If A12 = 0 Then   A12.Visible = False   

Else   A12.Visible = True   

End If   

If A13 = 0 Then   A13.Visible = False   

Else   A13.Visible = True   

End If   

End Sub

 

 
更多

------分隔线----------------------------

 上一篇:
下一篇:
  网友评论:
验证码:  

推荐文章

    热点文章

      ContactUs(联系我们)  -  Copyright(版权隐私)  - RemovedStatement(免责声明)   - Feedback(用户反馈)

      Copyright  ©  2018-2019 GreatShip--cebase.net  All rights reserved