如何读取MSFlexGrid控件的数据,并且以打印预览的形式输出!

解决方案 »

  1.   

    可以配合其它的控件,如 VSPrinter
    预览:
            VSP.StartDoc
            VSP.Header = "| (标题)"
        
            VSP.CurrentX = 11000
            VSP.CurrentY = 1600
            VSP.Text = "打印日期:   " & Now()
        
            VSP.CurrentY = 2300
            VSP.RenderControl = form1.MSFlexGrid1.hWnd          
            
            VSP.Zoom = 100
            VSP.EndDoc
            
            '设置打印时显示页码
            For i = 1 To VSP.PageCount
                VSP.StartOverlay i
                VSP.CurrentX = VSP.PageWidth - 4500
                VSP.CurrentY = VSP.PageHeight - 400
                VSP = "第 " & i & " 页  共 " & VSP.PageCount & " 页"
                VSP.EndOverlay
            Next打印:
            VSP.PrintDoc True
      

  2.   

    我好象有一个实例,不过我现在不在学校,在北京。你可以去www.mndsoft.com看看
      

  3.   

    试试看prtfg控件
    http://penchant.kftt.net