在VB中用代码打印ACCESS报表
| Dim objACC As Object Set objACC = CreateObject("Access.Application") objACC.OpenCurrentDatabase "c:\db.mdb" objACC.DoCmd.OpenReport "表报一" objACC.Quit Set objACC = Nothing 本类热门阅览 |
| Dim objACC As Object Set objACC = CreateObject("Access.Application") objACC.OpenCurrentDatabase "c:\db.mdb" objACC.DoCmd.OpenReport "表报一" objACC.Quit Set objACC = Nothing 本类热门阅览 |