Question

如何按条件 用VB打印Access数据库的报表程序

用VB打印Access数据库的报表程序如下：

Dim objACC As Object
Set objACC = CreateObject("Access.Application")
objACC.OpenCurrentDatabase "C:\Documents and Settings\Administrator\桌面\学生接送数据.mdb"
objACC.DoCmd.OpenReport "校对表"
objACC.Quit
Set objACC = Nothing

此报表打印的是其中Access中设置好的班级，如果要换一个班级打印这个报表，该如何编写这个程序？谢谢！！

Answer 1

定义一个变量来保存班级的选择(数据库的选择)
例如:dim DbName as string
然后将DbName在适当的地方进行改变
将下面的话改成:
objACC.OpenCurrentDatabase dbname

Answer 2

令狐兄，我是新手，能不能说的详细点，不胜感激！