在VB中用代码打印ACCESS报表

2016-02-19 19:08 6 1 收藏

下面请跟着图老师小编一起来了解下在VB中用代码打印ACCESS报表,精心挑选的内容希望大家喜欢,不要忘记点个赞哦!

【 tulaoshi.com - 编程语言 】

Set objACC = CreateObject("Access.Application")
objACC.OpenCurrentDatabase "c:db.mdb"
objACC.DoCmd.OpenReport "表报一"
objACC.Quit
Set objACC = Nothing

来源:http://www.tulaoshi.com/n/20160219/1620072.html

延伸阅读
标签: vb
  如果您在Access数据库、Access项目中删除数据或对象,可能会产生碎片并导致磁盘空间使用效率的降低。同时,数据库文件的大小并未减小,而是不断的增大,直至您的硬盘没有空间。有没有好的处理方法呢?其实,在Access中可以对数据库进行压缩优化以提升Access数据库和Access项目的性能,这样的压缩处理的实质是复制该文件,并重新组织文件...
何制作复杂报表——利用excel输出复杂报表     在读这篇文章以前首先要提醒大家,Access 本身的报表也具有很强的实用性和强大的功能,只有当你发掘了其本身全部的功能却仍不能满足你对报表的特殊要求时才请使用 Excel 输出报表。很明显,使用 Excel 输出报表第一个弱点就是必须同时打开 Access 和 Excel (当然,你得在一...
如何制作复杂报表——利用excel输出复杂报表     在读这篇文章以前首先要提醒大家,Access 本身的报表也具有很强的实用性和强大的功能,只有当你发掘了其本身全部的功能却仍不能满足你对报表的特殊要求时才请使用 Excel 输出报表。很明显,使用 Excel 输出报表第一个弱点就是必须同时打开 Access 和 Excel (当然,你得在...
使用控件有:Winsock控件,CommandButton 控件,TextBox 控件 编程步骤如下: 1.声明变量 2.把如下代码加到Command1的Command1_Click事件: Private Sub Command1_Click() Winsock1.LocalPort = 0 '设置本地使用的端口 Winsock1.Protocol = sckTCPProtocol '设置Winsock控件使用的协议,TCP或...
这个问题在很多论坛里边都有问到。但是一直没找到满意的答案。下边写出一个解决办法 Dim sql As String Dim rstLiuShui As New ADODB.Recordset Dim Rpt As New CRAXDDRT.Report Dim PrintApp As New CRAXDDRT.Application If Option2.Value = True Then sql = "select * from n_ihbill where datediff(d,日期,'" & Format(DTPicker1.V...

经验教程

443

收藏

34
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部