VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 559|回复: 5

[求助] 如何复制本地图片到粘贴板?

[复制链接]
发表于 2019-9-2 09:54:27 | 显示全部楼层 |阅读模式
如题,如何复制本地图片到粘贴板?
   我采用过这些方法,都行不通:
1、Clipboard.Clear
     Clipboard.SetData LoadPicture(图标地址)

2、Clipboard.Clear
     Clipboard.SetData Picture1.Image '复制控件上的图片到粘贴板 也不成
     Clipboard.SetDataPicture1.Picture ‘更改一下也不成
http://blog.sina.com.cn/s/blog_3fde61cd0100qn8p.html

3、老外的方法也不行:
    https://stackoverflow.com/questi ... board-as-one-object
发表于 2019-9-6 20:08:49 | 显示全部楼层
你这个标题不应该叫《如何复制本地图片到粘贴板》,应该叫《如何复制文件到粘贴板》,不然误会成把图片数据复制到剪贴板。
我找过一个老外写的剪贴板,可以复制文件到剪贴板、还可以读取剪贴板文件列表。是个类模块,有空可以下载研究一下。

评分

参与人数 1威望 +10 人气 +2 收起 理由
bruly + 10 + 2 很给力

查看全部评分

回复 支持 0 反对 1

使用道具 举报

发表于 2019-9-5 12:45:42 | 显示全部楼层
代码执行后粘贴板上的是数据,电脑上按粘贴需要的是文件格式,你可以在QQ里粘贴,就有 了

评分

参与人数 1威望 +10 人气 +2 收起 理由
bruly + 10 + 2 赞一个

查看全部评分

回复 支持 1 反对 0

使用道具 举报

发表于 2019-9-4 19:16:05 | 显示全部楼层
测试了一下
你的方法1、2 都是可行的。
Clipboard.Clear
Clipboard.SetData LoadPicture("C:\test\test.bmp")

先加载图片到控件,然后
Clipboard.Clear
Clipboard.SetData  Picture1.Picture

在画图中粘贴都是正常的,即使另外复制了图,只要使用代码设置剪贴板,马上更改过来。

评分

参与人数 1威望 +10 人气 +2 收起 理由
bruly + 10 + 2 赞一个

查看全部评分

回复 支持 1 反对 0

使用道具 举报

 楼主| 发表于 2019-9-5 06:53:42 | 显示全部楼层
vbfans01 发表于 2019-9-4 19:16
测试了一下
你的方法1、2 都是可行的。
Clipboard.Clear

感谢您的热心帮助。
我前面之所以说不行,判断依据是执行代码后,在电脑上按粘贴,发现并没有把复制到的图片粘贴出来
回复 支持 反对

使用道具 举报

 楼主| 发表于 2019-9-5 14:38:41 | 显示全部楼层
vbfans01 发表于 2019-9-4 19:16
测试了一下
你的方法1、2 都是可行的。
Clipboard.Clear

我使用这个方法好像可以了:
  1. For Each v In CreateObject("Shell.Application").NameSpace("D:\新建文件夹").ParseName("a.png").Verbs
  2.   If v.Name = "复制(&C)" Then v.DoIt
  3. Next
复制代码
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2019-11-12 15:01

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表