VB6.0通用选择路径并遍历文件夹及子文件夹.txt

VB6.0通用遍历所选文件夹及其多重子文件夹操作,直接使用Command按钮过程可以操作,无需其他额外控件。新建一个窗体,添加一个Command1按钮,添加一个listbox控件,名称为list1,打开一个Excel空白文件(如不需要请注释相关代码)。把本文件代码复制粘贴进去,单击按钮即可弹窗提示选择文件夹。