怎样保存picturebox中的图片（急，在线等）

Question

那样的情况！！
一般都这样的，
    picture1.picture=picture1.image
    if picture1.picture=0 then
       msgbox"图象为空！！不能保存！！"
    else
       savpicture picture1.picture, app.path & filename.bmp
       或 savpicture picture1.image, app.path & filename.bmp
    endif

Answer 1

AutoRedraw=False：savpicture picture1.picture, app.path & filename.bmp
AutoRedraw=True：savpicture picture1.Image, app.path & filename.bmpAutoRedraw=False的时候，自己绘制的东西优势的确不能保存，把AutoRedraw设为True！

Answer 2

SavePicture Picture1.Picture, "d:\a.jpg"