例如,把文件"E:\新建文件夹\a.txt"复制到剪贴板
成都创新互联专注于临湘网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供临湘营销型网站建设,临湘网站制作、临湘网页设计、临湘网站官网定制、成都微信小程序服务,打造临湘网络公司原创品牌,更为您提供临湘网站排名全网营销落地服务。
CreateObject("Shell.Application").NameSpace("E:\新建文件夹").ParseName("a.txt").InvokeVerb "复制(C)"
复制文件夹不用剪贴板,使用系统文件操作对象就好了
CreateObject("scripting.filesystemobject").copyfolder "c:\Program Files", "D:\Program Files"
用Computer类里的Clipboard的几个Get函数
如获取剪贴板里的文本
Dim c As New Microsoft.VisualBasic.Devices.Computer
MsgBox(c.Clipboard.GetText())
可以直接用My 里的
MsgBox(My.Computer.Clipboard.GetText())
获取图片
Me.BackgroundImage = My.Computer.Clipboard.GetImage()
在获取前确定剪贴板里有没有文本
If My.Computer.Clipboard.ContainsText Then
MsgBox(My.Computer.Clipboard.GetText)
End If
设置剪贴板里的文本
My.Computer.Clipboard.SetText(Now)
当前文章:vb点虐
访问剪贴板 vb剪切文件
本文来源:https://www.cdcxhl.com/article14/ddehdde.html
成都网站建设公司_创新互联,为您提供网站维护、建站公司、网站建设、商城网站、动态网站、App设计
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联