怎么没人能回答吗？急急！高手请进！VB中如何把MSGIRD中显示的多条记录用水晶报表打印输出？？

Question

CrystalReport1.Connect = sDns
    CrystalReport1.Destination = crptToPrinter
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.DiscardSavedData = True
'    CrystalReport1.SelectionFormula = "{rzsj} in " & Date & "'  to '" & Date + 1 & ""
'    CrystalReport1.SQLQuery = "select fjh from tbl_krxx where datediff(d,rzsj,'" & Date & "')=0"
    CrystalReport1.SQLQuery = "select * from tbl_krxx where fjh='1101'"
    CrystalReport1.ReportFileName = "c:\krxx.rpt"
    CrystalReport1.Action = 1

Answer 1

to :feifeilonglong(交友求知（河北）) 
你的用法还是要去访问数据库呀。我的意思是，记录已经在GRID中显示出来了，现在不用再去访问数据库，而直接把GRID中的记录用水晶报表打印输出

Answer 2

指定报表的ADO的记录集为DATAGRID的记录集即可。
在报表设计器中放上你要打印的字段。记不太清了。好久不用了。试试吧。

Answer 3

我怎么试都不行呀，怎么把ADODC控件拖到报表设计器中呀？？大家你们说能拖吗？？