控件的使用

Question

本人刚学VB,请教各位怎样用COMMONDIALOG控件中的"打开"对话框打开一个程序?

Answer 1

打开对话框只能指定路径找到路径后用 shell 文件路径＋文件名 
打开

Answer 2

Commondialog.ShowOpen
if trim(commondialog.filename)<>"" then
shell commondialog.filename,vbnormalfocus
end if

Answer 3

         co.CancelError =false
          co.Filter = "New Excel file (*.xls)|*.xls|Text file (*.txt)|*.txt"
         co.Flags = cdlOFNFileMustExist Or cdlOFNHideReadOnly Or cdlOFNExplorer
          co.ShowOpen