cn.Open
cmd.ActiveConnection = cn
cmd.CommandText = "select field1,count(field2) totalfield from  Mytable group by field1 "
'上面以field1分组统计field2出现次数
rs.CursorLocation = adUseClient
rs.Open cmd, , adOpenStatic, adLockBatchOptimistic
----ADO连接正常------Set m_Report = Nothing
m_Report.DiscardSavedData
m_Report.Database.SetDataSource rs
Screen.MousePointer = vbHourglass
CRViewer91.ReportSource = m_Report
CRViewer91.ViewReport
---上面绑定也正常------设计器上的details放了field1字段,所以结果也显示出来了,可是totalfield2是临时统计出来的,
不可能预先在设计器上放好,那该怎么办才能让它显示在报表上?