急,在线等,各位高手进来看看啊

Question

Dim beginpage, endpage, numcopies
CommonDialog1.CancelError = True
On Error GoTo errhandler
CommonDialog1.ShowPrinter
beginpage = CommonDialog1.FromPage
endpage = CommonDialog1.ToPage
numcopies = CommonDialog1.Copies
For i = 1 To numcopies
Printer.Print
'些处放将将数据发到打印机的语句
Next i
Exit Sub
errhandler:
怎么将数据发到打印机里啊
我要打印的是dbgird里面的数据库,是用DATA 连的

Answer 1

VB不提供打印Dgrid中的数据的方法，如果非要打印的话，就必须自己写代码。你给的分太少了所以没有人回！