VB如何获取所文件选路径？

VB如何获取所选路径？

首先在部件里勾上Microsoft   Common   Dialog   Control6.0(sp3)  
  然后在窗体上添加CommonDialog1控件`````  
  priavte   sub   command1_click()  
  CommonDialog1.showopen  
  text1.text=CommonDialog1.filename  
  end   sub