vb.net剪切文件 vb剪切复制粘贴的程序代码

VB 复制文件到剪切板

VB6.0只能复制一个vb.net剪切文件，例如把文件 "D:\aaaa.xml" 复制到剪贴板。

XP系统可用vb.net剪切文件的代码vb.net剪切文件：

CreateObject("Shell.Application").NameSpace("D:").ParseName("aaaa.xml").InvokeVerb "复制(C)"

XP和win7都能用的代码vb.net剪切文件：

For Each v In CreateObject("Shell.Application").NameSpace("D:").ParseName("aaaa.xml").Verbs

  If v.Name = "复制(C)" Then v.DoIt

Next

相关问答

Q1: vb，net怎么实现拖拽文件到文本框和粘贴复制？

第一步，点击VS工具

请点击输入图片描述

第二步，打开后，新建一个Windows窗体应用程序

请点击输入图片描述

第三步，新建完毕后，如图所示

请点击输入图片描述

第四步，拖动文本框与按钮，如图示

请点击输入图片描述

第五步，将剪贴板复制与粘贴代码输入，如图示

请点击输入图片描述

第六步，运行程序

请点击输入图片描述

7

第七步，点击按钮，成功从剪贴板中复制与粘贴操作

请点击输入图片描述

Q2: 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中显示vb.net剪切文件，然后在把PictureBox1.image放到剪切板中

Q3: 编程vb.net clipboard 剪切复制粘贴

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Clipboard.SetDataObject(TextBox1.Text)

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

TextBox1.Text = Clipboard.GetDataObject().GetData(DataFormats.Text, False)

End Sub

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

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

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

Q5: VB.net 剪切板的操作

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

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

关于vb.net剪切文件和vb剪切复制粘贴的程序代码的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。