请问vb里有判断目录或者文件的函数吗？各位大S帮忙啊

Question

还有，getfolder函数得到的怎么必须为父文件夹名＋i 啊？

Answer 1

如果指定的文件存在，返回 True，若不存在，则返回 False。
object.FileExists(filespec) dir函数
Dir[(pathname[, attributes])]
Dir 函数的语法具有以下几个部分：
部分 描述 
pathname 可选参数。用来指定文件名的字符串表达式，可能包含目录或文件夹、以及驱动器。如果没有找到 pathname，则会返回零长度字符串 ("")。 
attributes 可选参数。常数或数值表达式，其总和用来指定文件属性。如果省略，则会返回匹配 pathname 但不包含属性的文件。  
设置值attributes 参数的设置可为：常数 值 描述 
vbNormal 0 (缺省) 指定没有属性的文件。 
vbReadOnly 1 指定无属性的只读文件 
vbHidden 2 指定无属性的隐藏文件 
VbSystem 4 指定无属性的系统文件 
vbVolume 8 指定卷标文件；如果指定了其它属性，则忽略vbVolume 
vbDirectory 16 指定无属性文件及其路径和文件夹 

Answer 2

Public Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long
Public Const FILE_ATTRIBUTE_DIRECTORY = &H10
判断 GetFileAttributes(fileName) & FILE_ATTRIBUTE_DIRECTORY > 0
为真的话就是目录，否则不是

Answer 3

用VB自带的dir函数就可以了
dir可以带目录参数，返回第一个文件（目录）
不带参数返回下一个文件（或者目录）
如果没有文件了dir返回空字符串
所以你可以在一个循环里面使用dir