VB怎么更改文件夹的名字

VB怎么更改文件夹的名字

Name 语句：
重新命名一个文件、目录、或文件夹。
Name oldpathname As newpathname
oldpathname 必要参数。字符串表达式，指定已存在的文件名和位置，可以包含目录或文件夹、以及驱动器。
newpathname 必要参数。字符串表达式，指定新的文件名和位置，可以包含目录或文件夹、以及驱动器。而由 newpathname 所指定的文件名不能存在。
说明: Name 语句重新命名文件并将其移动到一个不同的目录或文件夹中。如有必要，Name 可跨驱动器移动文件。 但当 newpathname 和 oldpathname 都在相同的驱动器中时，只能重新命名已经存在的目录或文件夹。 Name 不能创建新文件、目录或文件夹。

在一个已打开的文件上使用 Name，将会产生错误。必须在改变名称之前，先关闭打开的文件。Name 参数不能包括多字符 (*) 和单字符 (?) 的统配符。

private sub command1_click() dim i as string dim pathstr as string pathstr = "d:\" '父目录 i = dir(pathstr, vbdirectory) '取第一个 do while i <> "" '不为空就循环 if i <> "." and i <> ".." then '如果不是 当前目录及上一级目录 . 及 .. if (getattr(pathstr & i) and vbdirectory) = vbdirectory then '是否是目录 list1.additem i '确定是目录,添加到列表,这里可以自己处理 end if end if i = dir '取下一个 loop end sub