各位大虾!
我在程序里要对数据打印,打印在一张纸A4中输出,是一组表格数据(7列50行),程序里用数组保存,数据显示在一个MSFLEXGRID控件里,保存在一个EXCEL文件里,碰到如下问题:
一、对显示在MSFLEXGRID控件里的数据直接打印,可以是可以,但有几点不足:
1、不能实现预览
2、输出的页面位置不知道如何控制(页面设置问题),太靠左边了,希望能够居中。
3、希望能打印一个标题,
二、对已经保存在EXCEL文件里的数据实现打印页可以,但也有以上几个同样的问题,另外:
1、写入EXCEL时或者打印EXCEL文件时,对单元格的行、列的高、宽如何控制?
2、希望能过打印出表格线,如何实现?
各位高手请帮忙!
我用的不熟,希望能给详细一些的代码!
这里先谢了!

解决方案 »

  1.   


    预览用picturebox代替printer打印标题用
    currentx=1000
    currenty=2000
    printer.print"标题"
      

  2.   

    表格线可以打印直线:
    printer.line (x1,y1)-(x2,y2)页边距用一个变量控制:
    dim topMargin as long
    dim leftMargin as long
    topmargin=100
    leftmargin=100currentx=500+leftmargin:currenty=800+topmargin
    printer.print "abc"
    你怎么不写出你的代码让大伙看看?
      

  3.   

    1实现预览:
    输出对象用picturebox2、希望能过打印出表格线,如何实现?
    xlSheet.Range(xlSheet.Cells(1, 1), xlSheet.Cells(10, 10)).Borders.LineStyle = xlContinuous