DataReport报表或者直接用Printer对象

解决方案 »

  1.   

    一个一个打印可以了:
      如: dim mrc as adodc.recordset
           set mrc=ExcutleSQL(text1.text,msgtext)  '执行SQL返回结果
      然后用:printer对象,一个个打出来,就可以了!
       //使用 Printer 对象可以实现与系统打印机的通讯!还不明白的话,打开msdn看一下Printer对象的内容!
      
    还不行的话,给我发短消息!!! 
      

  2.   

    一个一个打印可以了:
      如: dim mrc as adodc.recordset
           set mrc=ExcutleSQL(text1.text,msgtext)  '执行SQL返回结果
      然后用printer对象和设置打印样式,一个个打出来,就可以了!
       //使用 Printer 对象可以实现与系统打印机的通讯!还不明白的话,打开msdn看一下Printer对象的内容!
      
    还不行的话,给我发短消息!!!