请问各位都是用什么做报表，并实现打印预览的呢？

Question

预揽不好做，一般载excel中写

Answer 1

DataReport
Crystal report 
activate report 

Answer 2

ado +   DataReport  不用数据环境Set Me.DataSource = rs
On Error Resume Next
Me.Sections("Section1").Controls("text1").DataField = rs.Fields.Item(0).Name
Me.Sections("Section1").Controls("text2").DataField = rs.Fields.Item(1).Name
Me.Sections("Section1").Controls("text3").DataField = rs.Fields.Item(2).Name
Me.Sections("Section1").Controls("text4").DataField = rs.Fields.Item(3).Name
Me.Sections("Section1").Controls("text5").DataField = rs.Fields.Item(4).Name
Me.Sections("Section1").Controls("text6").DataField = rs.Fields.Item(5).Name
Me.Sections("Section1").Controls("text7").DataField = rs.Fields.Item(6).Name
Me.Sections("Section1").Controls("text8").DataField = rs.Fields.Item(7).Name