Mshflexgrid 合并单元格后，怎样用 DataReport 打印合并后的结果?

up

解决方案 »

  1.   

    直接打吧
                If MsgBox("你是否要打印此表格？" & vbCrLf & "如果打印，请等待打印作业.....", 4 + 32 + 256, "打印") = vbYes Then
                    Printer.ScaleMode = vbCentimeters
                    Printer.PaintPicture MSHFlexGrid1.Picture, 2, 2
                    Printer.EndDoc
                End If
      

  2.   

    PaintPicture会遇到分页以及分辨率的问题。建议采用一牛人写的专门打印Mshflexgrid的库：DllPrint