你是不是没添加 Common Dialog 控件啦？
1. VB 主菜单 工程 \ 部件 勾上 Microsoft Common Dialog Contorl 6.0
2. 表单放上这个控件。
部件中添加Microsoft Common Dialog Control 6.0控件，然后拖入窗体中
