VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >
  • vb教程之在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 & " ovelty.mdb") 



  MSAccess.DoCmd.OpenReport "rptEmployess",acViewNormal 

  MSAccess.CloseCurrentDatabase 

  Set MSAccess=Nothing 

end Sub 

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

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

本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。


相关教程