在VB中运行MicrosoftAccess报表的好方法

　　在VB中如何使用直观、简便的报表一直是很多人关心的问题，CrystalReports用起来又不太理想。现介绍一在VB中运行MicrosoftAccess报表的方法，用起来还不错。

　　利用Automation运行MicrosoftAccess报表

　　1.使用MicrosoftAccess建立数据库(如：novelty.mdb)的相关报表(如：rptEmployess)。

　　2.创建引用

　　在VB中使用“ProjectReferences"菜单创建一个对MicrosoftAccess8.0ObjectLibrary的引用。

　　3.程序清单

　　'ReferencesMSAccess8.0ObjectLibrary(this

　　'codewillworkwithanyversonofAccessthat

　　'supportsAutomation)

　　DimMSAccessAsAccess.Application

　　PrivatesubCommand1_Click()

　　SetMSAccess=NEWAccess.Application

　　MSAccess.OpenCurrentDatabase(App.Path&" ovelty.mdb")

　　MSAccess.DoCmd.OpenReport"rptEmployess",acViewNormal

　　MSAccess.CloseCurrentDatabase

　　SetMSAccess=Nothing

　　endSub

　　注：acViewNormal告知Access打开该报表并立即打印。

　　这种方法有个缺点，就是运行环境中必须装有MSAccess。->

时间： 2024-04-26 00:00:51

在VB中运行MicrosoftAccess报表的好方法的相关文章

在VB中使用水晶报表的一种简易编程方法

编程|水晶报表水晶报表(Crystal Report)的业内最专业.功能最强的报表系统,它除了强大的报表功能外,最大的优势是实现了与绝大多数流行开发工具的集成和接口.在VS.Net平台做过报表开发的程序员,一定都对水晶报表强大.高效.集成等特性留下了深刻印象.除了开发新程序外,在工作中我们常需要接触到很多较早的软件系统报表功能升级的需求,如果能结合水晶报表这一强大的工具,往往能事半功倍. VB是以前流行的数据库开发平台,用其开发的C/S系统在社会上有非常大的保有量,但V

vb中使用水晶报表教程

相关文章: 水晶报表封装成VB的DLL 水晶报表(Crystal Report)是业内最专业.功能最强的报表系统,它除了强大的报表功能外,最大的优势是实现了与绝大多数流行开发工具的集成和接口.在VS.Net平台做过报表开发的程序员,一定都对水晶报表强大.高效.集成等特性留下了深刻印象.除了开发新程序外,在工作中我们常需要接触到很多较早的软件系统报表功能升级的需求,如果能结合水晶报表这一强大的工具,往往能事半功倍. VB是以前流行的数据库开发平台,用其开发的C/S系统在社会上有非常大的保有量,但V

VB程序打印水晶报表的典型方法2

程序|打印|水晶报表描述: 本文介绍另一种流行的一种VB程序打印水晶报表的方法. 环境: MS SQL SERVER 2000 / VB6 / CRYSTAL REPORT8.5 步骤 1: 建立ODBC连接 2: 创建一个为Crystal Report报表文件 3: 加载Microsoft ActiveX Data Objects Library 至项目的References 中 4. 创建VB 设计(Designer) , 通过open existing f

VB程序打印水晶报表的典型方法1

程序|打印|水晶报表描述: 本文介绍流行的一种VB程序打印水晶报表的方法,具有比较好的扩展性. 环境: MS SQL SERVER 2000 / VB6 / CRYSTAL REPORT8.5 步骤 1: 建立ODBC连接 2: 创建一个为Crystal Report检索数据的过程(procedure) 举例: (通过日期查询总额) if exists (select * from sysobjects where name = 'usp_testf

VB中Val是什么?Val使用方法教程

VB中Val是什么?在VB语言中,val一个把数值字符串转为数值的函数,在它不能识别为数字的第一个字符上,停止读入字符串.那些被认为是数值的一部分的符号和字符,例如美圆号与逗号,都不能被识别.但是函数可以识别进位制符号 &O(八进制)和 &H(十六进制).空白.制表符和换行符都从参数中被去掉. Val是类型转换函数: VAL(字符串表达式)将数字字符串换成数值使用方法如:VAL("-3.85")返回-3.85 VAL("vb5.0")返回0 V

VB中打印ACCESS报表

access|打印 Dim acc As ObjectSet acc = CreateObject("Access.Application")If Right$(Trim$(App.Path), 1) = "\" Thenacc.OpenCurrentDatabase App.Path & "data.mdb"'打开数据库Elseacc.OpenCurrentDatabase App.Path & "\data.mdb&

在ASP程序中打印Excel报表的新方法

excel|程序|打印目前,B/S模式(浏览器/服务器模式)成为企业网上首选的计算模式.由于B/S模式的特殊性,在C/S下相对较易实现的Excel报表打印功能在B/S下却成为一个难点.本人通过研究写了一个基于ASP程序的打印Excel报表的程序.本程序的特点是无须任何组件. Print.asp------------------------------------------------ <html><title>打印Excel报表</title><%'控制脚本

浅谈crystal reports在VB中的调用

环境:VB6.0,crystal reports 9.0 在一个项目中用到了crystal reports,总结一些经验和教训. 以做一张单据的套打为例. 单据包括单据头,单据体.单据头和单据体可能是一对多的关系.并且他们分别存在于两张表当中,用字段FID做关联.要求能够动态的传入参数FID,显示不同的结果. 首先,打开crystal reports,做好一张单据的模板rpt.制作报表的方法有很多,比如:用它的图形化工具直接建立几个表之间的连接,然后将想要显示的字段托到报表当中:或是调用一个已经

在ASP程序中打印Excel表格的新方法

在ASP程序中打印Excel报表的新方法目前,B/S模式(浏览器/服务器模式)成为企业网上首选的计算模式.由于B/S模式的特殊性,在C/S下相对较易实现的Excel报表打印功能在B/S下却成为一个难点.本人通过研究写了一个基于ASP程序的打印Excel报表的程序.本程序的特点是无须任何组件. Print.asp ------------------------------------------------ <html><title>打印Excel报表</title&