我想從"執行檔所在的目錄"中開啟DOC檔案
我用start
Dim ChSub As String
Dim Pig As Long
ChSub = App.Path + "\..\Data\change.doc"
Pig = Shell("start" + ChSub, vbNormalFocus)
但是在程式執行之後, 卻沒有反應
有時會開出一閃即逝的dos視窗
我到http://feitsui.hyd.ncku.edu.tw/TLCheng/Basic/index.htm中參考設定
其中需要設定引用項目, 不過我的vb裡, 根本沒有Microsoft Shell Controls and Automation這一項說..
所以以下指令無法執行..
Dim tShell As New Shell ' 宣告物件
tShell.Open App.Path + "\..\Data\change.doc"
是不是哪裡出錯了呢?