vb.net剪切板 vbs 剪切板

VB.net 剪切板的操作

复制文件夹不用剪贴板，使用系统文件操作对象就好了

“真诚服务，让网络创造价值”是我们的服务理念，创新互联团队十余年如一日始终坚持在网站建设领域,为客户提供优质服。不管你处于什么行业，助你轻松跨入“互联网+”时代，PC网站+手机网站+公众号+成都微信小程序。

CreateObject("scripting.filesystemobject").copyfolder "c:\Program Files", "D:\Program Files"

VB.NET如何获取剪切板里面的内容

通过：

Clipboard.GetText

Clipboard.GetData

可以得到系统剪贴板的内容

如果剪贴板中的内容是文字，Clipboard.GetFormat(1)=True 。

获得文字直接用

Clipboard.GetText

获得图片可以用

Clipboard.GetData

设置文字直接用

Clipboard.SetText

设置图片可以用

Clipboard.SetData

清空

Clipboard.Clear

检测剪贴板中的内容

Clipboard.GetFormat(1)

返回True则文字

返回False则其他

vb.net 如何把窗口内容作为图元(Meta)格式拷贝到剪切板中？

Dim p1 As New Point(0, 0)

Dim p2 As New Point(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height) '除工具栏全屏

Dim pic As New Bitmap(p2.X, p2.Y)

Using g As Graphics = Graphics.FromImage(pic)

g.CopyFromScreen(p1, p1, p2)

PictureBox1.Image = pic

End Using

Clipboard.SetImage(PictureBox1.Image)

截图到PictureBox1中显示，然后在把PictureBox1.image放到剪切板中

VB.NET怎么复制文件到剪切板，不是复制文件内容！

例如，把文件"E:\新建文件夹\a.txt"复制到剪贴板

CreateObject("Shell.Application").NameSpace("E:\新建文件夹").ParseName("a.txt").InvokeVerb "复制(C)"