需将listview中的所有项打印到A4页面里
数据如同:aaa  bbb ccc ddd ...
要求自动换行;
最不明白的问题是,需要在A4右下角留下几个框(盖章签字用),且需要位置固定
看了些帮助文档,没头绪

解决方案 »

  1.   

    design a report, then get the datasource from the original database.
      

  2.   

    问题关键是如果 design a report ?
      

  3.   

    折腾了几天没整出来,但要求必须用printer打印,请问各位大侠,printer如何打印正方形及输出内容呢
      

  4.   

    参阅:http://zhidao.baidu.com/question/4168806.html
      

  5.   

    参阅:http://zhidao.baidu.com/question/4168806.html
      

  6.   

    自己划线,就是用LINE画出来啊
      

  7.   

    Private Sub Command1_Click()
    Dim pr As Printer
    pr.Line(500, 500, 2000, 2000, vbRed, True, False)
    pr.EndDoc()
    End Sub打印矩形,报 pr.Line(500, 500, 2000, 2000, vbRed, True, False) 这行语法错误
    那位能否指出来错在哪里?
      

  8.   

    pr.Line(500, 500)-( 2000, 2000), vbRed, True, False) 这行语法错误
      

  9.   

    pr.Line(500, 500)-( 2000, 2000), vbRed, True, False
      

  10.   

    谢谢楼上各位
    正确为:Printer.Line (500, 500)-(2000, 2000),vbred , B