我使用print在picture box里写了几个特效字,我想把它保存成图片,如何办呢

wxuevb 2002-06-20 11:35:21
我使用print在picture box里写了几个特效字,我想把它保存成图片,如何办呢?使用
savepicture不行,有别的办法吗
...全文
102 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
GateMenD 2002-06-21
  • 打赏
  • 举报
回复
picture1.autoRedraw=true
SavePicture Picture1.Image, "c:\kk.bmp"
footballboy 2002-06-21
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Picture1.CurrentX = 200
Picture1.CurrentY = 200
Picture1.Print "在图片框中打印文字"
End Sub

Private Sub Command2_Click()
SavePicture Picture1.Image, "c:\temp\pic.bmp"
End Sub

Private Sub Form_Load()
Picture1.AutoRedraw = True
Command1.Caption = "在图像框中输出文字"
Command2.Caption = "保存图像框内容"
End Sub
cloudawind 2002-06-20
  • 打赏
  • 举报
回复
应该这样,
savepicture picture1.image,filename
evbsky 2002-06-20
  • 打赏
  • 举报
回复
set picture1.image=picture1.picture
savepicture picture1.picture
evbsky 2002-06-20
  • 打赏
  • 举报
回复
'用set
set picture1.image=picture1.picture
savepicture picture1.picture
qhzxcz 2002-06-20
  • 打赏
  • 举报
回复
CommonDialog1.ShowSave
SavePicture Picture3.Image, CommonDialog1.FileName
Iamfish 2002-06-20
  • 打赏
  • 举报
回复

SavePicture PicBox.Picture, bmpFileName
viperstorm 2002-06-20
  • 打赏
  • 举报
回复
先设 picture1.redraw=true
picture1.picture=picture1.image
savepicture picture1.picture,"c:\1.bmp"

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧