怎么复制指定路径的文件

如何复制指定路径的文件Files List1.List(List1.ListIndex)files是文件的路径,如何对其复制,只要点下按

如何复制指定路径的文件
Files = List1.List(List1.ListIndex)
files是文件的路径,如何对其复制,只要点下按钮就对文件复制(不粘贴)?然后我自己在其他地方右键-粘贴就行了
[解决办法]

引用:
Quote: 引用:

http://www.vb-helper.com/howto_get_set_clipboard_files.html

Public Function ClipboardSetFiles(file_names() As String) _
    As Boolean



Dim s As String
s = Text1.Text() 
text1.text为文件路径
怎么使用 function

Dim arr(1) As String
arr(0) = Text1.Text
ClipboardSetFiles(arr)