投稿日 | : 2003/04/15(Tue) 22:43 |
投稿者 | : まる |
URL | : |
タイトル | : shell関数でexeを起動 |
下記のようなコードをかきました。
exeを起動させ、自画面を終了するようにしたいのですが,
自画面を終了させることができません。exeは起動しました。
どうしたらいいのでしょうか?
よろしくおねがいします。
'------------------------------------------------------------
Private Sub cmdMenu_Click()
Dim lngRet As Long
Dim MyFile As String
MyFile = Chr$(34) & "D:\業務\Test.exe" & Chr$(34)
lngRet = Shell(MyFile, vbNormalFocus)
end
end sub
'-----------------------------------------------------------
環境:VB6.0 Windows2000