執行外部程式工具模組：

需一同載入視窗工具模組

執行外部程式
尋找預設執行檔路徑與參數		 利用預設瀏覽器開啟或編輯現有文件

執行外部程式：

函數 引數 傳回值 說明
myShell
  1. File = 執行檔名
  2. CommandLine = 命令列引數(可省略)
  3. WorkPath = 執行目錄(可省略)
  4. WindowStyle = 執行視窗狀態(可省略)
  5. Wait = 是否等待執行程式中止(預設為真，可省略)
 hWnd 傳回執行程式的 hWnd ，說實在的，這也算是超級 FAQ 了，若引數 Wait 選擇為真，則傳回 0 (因為等到應用程式跑到結束了嘛，當然沒有 hWnd 了)，若要執行 DOS 程式，則用下面那個
myDOSShell 同上 hWnd 傳回執行程式的 hWnd，若引數 Wait 選擇為真，則傳回 0 ，若要執行 Windows 程式，則用上面那個

範例：

hWnd=myShell("SNDVOL32.EXE") ' 啟動音量控制程式，並等待音量控制程式結束才繼續

利用預設瀏覽器開啟或編輯現有文件：

函數：myShellExecute

引數：

  1. hWnd
  2. nOperation As enulpOperation：動作分編輯、執行、開啟、列印、屬性
  3. lpFile：要開啟的檔名
  4. lpParameters：所需參數 (可省略)
  5. lpDirectory：執行目錄(可省略)
  6. nShowCmd：執行視窗狀態(可省略)

範例：

myShellExecute 0,lpOperation_open,"http://feitsui.hyd.ncku.edu.tw/TLCheng/Basic/index.htm"

尋找預設執行檔路徑與參數：

函數：myFindExecutable

引數：lpFullFilename

範例：Debug.Print myFindExecutable("c:\temp\KL9603.TID")

引數 傳回值
c:\temp\Schema.ini C:\WINDOWS\NOTEPAD.EXE c:\temp\SCHEMA.INI
c:\temp C:\WINDOWS\Explorer.exe /idlist,:0,c:\TEMP
c:\temp\test.xls C:\Program Files\Microsoft Office\Office\excel.exe /e

傳回值：傳回開啟這個檔案的執行檔的檔名與參數，檔名與引數以 Chr(0) 隔開，函數 myGetSingleFileName, myGetPath 見檔案工具模組

說明：很多人要找某個檔案的執行檔，必須透過註冊資訊來取得，這個函數可讓你更方便，特別的是連目錄的開啟參數都能取得