高考问答古琴曲长相思李金娜:vb 怎么移动文件
来源：百度文库 编辑：高考问答 时间：2024/04/29 19:26:35
是一类(*.mp3)
Dim Command As String
Command = "cmd /c copy " + Text1.Text + "\*.mp3 " + Text2.Text + "\*.mp3"
MsgBox Command
Shell (Command)
注意第二个command=...这一长串要写在一行里，
同时"cmd /c copy "和 "\*.mp3 "两部分，引号里面都必须要有一个空格
Name 语句
重新命名一个文件、目录、或文件夹。
语法
Name oldpathname As newpathname
Name 语句的语法具有以下几个部分：
部分
描述
oldpathname
必要参数。字符串表达式，指定已存在的文件名和位置，可以包含目录或文件夹、以及驱动器。
newpathname
必要参数。字符串表达式，指定新的文件名和位置，可以包含目录或文件夹、以及驱动器。而由 newpathname
所指定的文件名不能存在。
说明
Name 语句重新命名文件并将其移动到一个不同的目录或文件夹中。如有必要，Name 可跨驱动器移动文件。 但当 newpathname 和
oldpathname 都在相同的驱动器中时，只能重新命名已经存在的目录或文件夹。 Name 不能创建新文件、目录或文件夹。
在一个已打开的文件上使用 Name，将会产生错误。必须在改变名称之前，先关闭打开的文件。Name 参数不能包括多字符 (*)
和单字符 (?) 的统配符。
Name 语句示例
本示例使用 Name 语句来更改文件的名称。示例中假设所有使用到的目录或文件夹都已存在。
Dim OldName, NewName
OldName = "OLDFILE": NewName = "NEWFILE" ' 定义文件名。
Name OldName As NewName ' 更改文件名。
OldName = "C:\MYDIR\OLDFILE": NewName = "C:\YOURDIR\NEWFILE"
Name OldName As NewName ' 更改文件名，并移动文件。
假定目标文件夹和源文件都存在，仅考虑文件移动问题
FileCopy "c:\123\1.mp3", "d:\456\1.mp3"
Kill "c:\123\1.mp3"
name "c:\123\mp3.mp3" as "d:\456\mp3.mp3"