vb picture问题

来源:百度知道 编辑:UC知道 时间:2024/07/09 01:42:44
我在picture内已经把图片弄好了

添加一个按钮,不要执行
SavePicture Picture1.Image, App.Path & "\" & "1.bmp"
也就是说不执行保存

而要执行剪切功能!~

=====================
添加command1
执行剪切picture1现成的图片
======================

由于我是新手
没有什么分,只有20分~全部给出去了..
请大家给出
============
给出详细源码
============

Private Sub Command1_Click()
Clipboard.SetData Picture1.Picture
Picture1.Picture = Nothing
End Sub

你可以Picture1(1).PaintPicture Picture1(0).Picture, 0, 0, Picture1(1).ScaleWidth, Picture1(1).ScaleHeight, 你要的.Left, 你要的.Top, 你要的Wid, 你要的Hei
看下PaintPicture MSDN 帮助

ClipBoard.SetData Picture1.Image

没看明白你什么意思!