最佳答案
1首先打开VB6——点击新建——选择标准EXE——点击打开。如果没有新建对话框，那么点击文件——新建工程——选择标准EXE后点击确定。
2第二步，先在左侧工具箱把commondialog 部件拖放到窗体那里，然后再点击一下命令控件并在窗体那里画一个方框，命令控件按钮就画出来——右击命令按钮，选择属性窗口——在属性窗口那里把Caption属性改为：打开。（如果工具箱那里没有commondialog 部件，右击任一控件——选择部件——然后找到common dialog control选项，勾选后点击确定就会出现了）
3第三步，添加代码。右击命令按钮——选择查看代码——然后在弹出的代码编辑界面输入如下图的代码
4第四步，检测语句。点击调试——然后选择逐语句或逐过程，就会自动检测是否有问题。如果没问题就可以点击运行——启动——然后就会弹出打开文件窗口。
5第五步，保存工程并生成工程。点击文件——选择保存工程，然后选择保存路径并命名后点击保存。同样点击文件——选择生成工程，然后选择路径——点击确定就生成工程了。
6最后，也可以工具箱那里选择 DIRLISTBOX控件，然后双击该控件并输入如下图的代码