VB6 复制Picture1里面的图片到剪贴板，子程序 f_CopyPictrue2024年11月18日 23:08
新建From1（窗体），新建Command1（按钮CommandButton），准备一张图片 123.bmp，代码：
Private Sub Command1_Click()
Call f_CopyPictrue(Picture1)
End Sub
Private Sub Form_Load()
Picture1.Picture = LoadPicture(App.Path & "\123.bmp")
End Sub新建模块 modCopyPicture.bas，代码：
具体代码只能由VIP查看，请升级 。
这样可以粘贴到PS等软件。
全部回复（0）