VB 剪切文件到剪切板

来源：百度知道 编辑：UC知道 时间：2024/05/13 03:16:14
点击按钮后剪切某个文件，在资源管理器里粘贴即把刚才复制的文件移动过来

Private Declare Function MoveFile& Lib "kernel32" Alias "MoveFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String)
Private Sub Command1_Click()
MoveFile "d:\1.jpg", "e:\1.jpg"'前面是要移动的文件路径 后面是移动后的
End Sub