热情软件屋

 

如何打印LISTVIEW(报表型)的内容


编号:QA000672
建立日期: 1999年3月22日 最后修改日期:1999年10月30日
所属类别:

lihai:
    vb50
    如何打印LISTVIEW(报表型)的内容?
    

回答:

    没有特别简单的办法。
    一个办法是利用ListView.ListItems集合遍历所有的数据,并输出至打印机。如:
     Dim i, j
     For i = 1 To ListView1.ListItems.Count
     Printer.Print ListView1.ListItems(i),
     For j = 1 To ListView1.ColumnHeaders.Count - 1
     Printer.Print ListView1.ListItems(i).SubItems(j),
     Next
     Printer.Print
     Next
    另一个办法是遍历数据的同时,将数据输出到一个临时数据库文件,然后利用报表控件输出。

此问题由李海回答。

 
把这个问题推荐给朋友
   
   
您的意见类别
您的名字
您的电子邮件
您的建议(请尽可能详细)
 
 

版权所有 1997-2008 热情软件屋
如果您有任何建议和意见, 请给我发个电子邮件 askpro@china-askpro.com
Web Designed by ZebraStudio