VB中打印ACCESS报表

VB中打印ACCESS报表,VB中打印ACCESS报表

Dim acc As Object

Set acc = CreateObject("")

If Right$(Trim$(), 1) = "" Then

& "data.mdb"

打开数据库

Else

& "data.mdb"

End If

"打印准考证" , acPreview

打印报表“打印准考证”

Set acc = Nothing使用ACCESS报表主要缺点就是不能预览