VBからファイル・アプリケーションの起動はどうやれば？

質問

VB6にて、簡単なプログラムを作っています。（個人的にです）

コマンドボタンを押すと、保存してあるテキストファイル
（例："C:\a.txt"）や、単純にノートパッドなどのアプ
リケーション（C:\WINNT\NOTEPAD.exe）がオープンする
ようにしたいのですけど、本やネットで検索してもイマイ
チわからないです。

どうやればよろしいのでしょうか？

環境はWin2000ProのVB6（SP5）です。
よろしくお願いします。

回答No.2

PAPA0427 · ベストアンサー

Ｓｈｅｌｌ関数を使えば出来ます。

ご質問の場合は、
Dim Ret

Ret = Shell("C:\WINNT\NOTEPAD.exe", vbNormalFocus)

とすれば、ＯＫです。

詳しい、パラメータはヘルプを参照してください。

お礼

どうもありがとうございます。

NO.1でレスしてくれた方のやり方ですと、ノートパッドが
アクティブにならなかったので、すごく助かりました。

回答No.1

TTak

C:\WINDOWS\NOTEPAD.EXEを開く場合、

Private Sub Command1_Click()
Shell ("C:\WINDOWS\NOTEPAD.EXE")
End Sub

C:\a.txtを開く場合

Private Sub Command2_Click()
Shell ("""C:\WINDOWS\NOTEPAD.EXE"" ""C:\a.txt""")
End Sub

となります。Shell関数を使うと便利です。

お礼

どうもありがとうございます。

すぐ出来ました。
ただ、立ち上げたファイル及びアプリケーションは
アクティブにならないのですね。

出来ることなら、オープンと同時にアプリケーションを
アクティブにしたいですけど、VBでは無理でしょうか？？