プロが教える店舗&オフィスのセキュリティ対策術

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

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

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

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

A 回答 (2件)

Shell関数を使えば出来ます。



ご質問の場合は、
Dim Ret

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

とすれば、OKです。

詳しい、パラメータはヘルプを参照してください。
    • good
    • 0
この回答へのお礼

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

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

お礼日時:2003/05/06 17:13

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関数を使うと便利です。
    • good
    • 0
この回答へのお礼

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

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

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

お礼日時:2003/05/06 17:12

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!