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

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