VB6选择文件夹模块（完整版）

弹出式文件夹浏览对话框。 一个模块，一个函数就可调用。

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       1163  2011-03-10 18:01  文件夹浏览（完整）\Form1.frm

     文件       4250  2011-03-10 18:01  文件夹浏览（完整）\Module1.bas

    ......R       190  2010-11-15 23:50  文件夹浏览（完整）\MSSCCPRJ.SCC

     文件        668  2011-03-10 16:02  文件夹浏览（完整）\工程1.vbp

     文件         84  2011-03-10 18:02  文件夹浏览（完整）\工程1.vbw

     目录          0  2011-03-10 18:01  文件夹浏览（完整）

----------- ---------  ---------- -----  ----

                 6355                    6