Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-报表

[access报表]在VB中运行Microsoft access报表的好方法

时 间:2007-10-18 21:08:54
作 者:sxhmft   ID:14  城市:长沙
摘 要:在VB中运行Microsoft Access报表的好方法
正 文:

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

  利用Automation运行Microsoft Access报表

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

2. 创建引用

  在VB中使用“Project References"菜单创建一个对Microsoft Access 8.0 Object Library

的引用。

3. 程序清单

注释:References MS Access 8.0 Object Library (this

注释:code will work with any verson of Access that

注释:supports Automation)

Dim MSAccess As Access.Application

Private sub Command1_Click()

  Set MSAccess=NEW Access.Application

  MSAccess.OpenCurrentDatabase(App.Path & "\novelty.mdb")



  MSAccess.DoCmd.OpenReport "rptEmployess",acViewNormal

  MSAccess.CloseCurrentDatabase

  Set MSAccess=Nothing

end Sub

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

   这种方法有个缺点,就是运行环境中必须装有MS Access


Access软件网QQ交流群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助