1,453
社区成员
发帖
与我相关
我的任务
分享Picture控件
如何在Picture控件上画一张小图标.
即Picture上本来就显示一张画.我想,鼠标点后,在点的地方画上一个小图标,原来的图片不变.
即Picture上本来就显示一张画.我想,鼠标点后,在点的地方画上一个小图标,原来的图片不变.
...全文
请发表友善的回复…
发表回复
huwb 2006-11-08
- 打赏
- 举报
谢谢你们的回答.如果要显示的图片是.png格式(透明的)的就不可以了.
Alzzl 2006-11-08
- 打赏
- 举报
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.PaintPicture LoadPicture("c:\11.gif"), X, Y
End Sub
Picture1.PaintPicture LoadPicture("c:\11.gif"), X, Y
End Sub
huwb 2006-11-08
- 打赏
- 举报
能不能具体说一下.
fj182 2006-11-08
- 打赏
- 举报
PaintPicture
Alzzl 2006-11-08
- 打赏
- 举报
透明的也可以，PaintPicture 最后一个参数就是（我为了方便直接省略了，默认的是vbsrccopy），你自己研究下
