本人在窗体上添加有picturebox,并用line,PSet等语句在picturebox上绘图,但是用 窗体.printform打印时,打印出来的picturebox上什么都没有,我已经把picturebox的AutoRedraw设为true了啊!不知道是什么问题了,在另一个工程里又可以打出来,但要用的这个工程就是打不出,时间不多了,弄了一天了,大家认为是什么问题呢?请帮下忙!谢谢!

解决方案 »

  1.   

    Pictue1.autoredraw=true
    ...  '这里加上你画的代码
    picture1.refresh
    picture1.autoredraw=false
    me.printform
    试试
      

  2.   

    试过了,不行啊!
    但是明明我已经把图画出到picture1上了啊
    Autodraw也是true啊!
    可是打印的时候就是打不出来!
      

  3.   

    Private Sub Command1_Click()
    Picture1.AutoRedraw = True
    Picture1.Line (10, 10)-(1000, 0.1)
    Picture1.Picture = Picture1.Image
    Me.PrintForm
    End Sub
      

  4.   

    谢谢laviewpbt,根据你的方法
    我把Picture1.Picture = Picture1.Image加到打印的模块就可以打出来了,非常感谢!