补充说明:
    我想实现通过某种查询把查询的结果打印出来,我知道VB里有一个报表设计器,我如何把该报表与查询的结果关联起来,又如何打印出来呢?

解决方案 »

  1.   

    为什么都这么排斥初学者呢?
      

  2.   

    不是排斥
        我有办法,就是麻烦一点想要吗?
    rs.MoveFirst
    Dim tmp(7) As String
    Row = 0
    Do While Not rs.EOF
    Printer.CurrentX = 1.5
    tmp(0) = rs.Fields("")
    tmp(1) = rs.Fields("")
    tmp(2) = rs.Fields("")
    tmp(3) = rs.Fields("")
    tmp(4) = rs.Fields("")
    tmp(5) = rs.Fields("")
    tmp(6) = rs.Fields("")
    tmp(7) = rs.Fields("")
    Printer.Print tmp(0), tmp(1), tmp(2), tmp(3), tmp(4), tmp(5), tmp(6), tmp(7)
    就ok了