VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2005/01/14(Fri) 16:00 |
| 投稿者 | ： まさよし |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^4: 外部アプリの終了方法 |
YK様、ご迷惑をお掛けします。
私の説明不足ですね。
Ret = Shell("C:\Program Files\AutoCAD LT 2004\aclt.exe", vbMaximizedFocus)
ここで、AutoCADが起動します。
Sleep (8000)
'AutoCADをアクティブにします。
AppActivate "AutoCAD"
'3000ミリ秒待機させる(3秒)
Sleep (3000)
'コマンドラインに送信
SendKeys "filedia" & Chr$(13) & "0" & Chr$(13) & &
amp;
quot;script" & Chr$(13)
& "c:\temp\scriptC.scr" & Chr$(13), True
sendkeysでAutoCADのコマンドラインにコマンドが送られます。
一通り処理が終わります。
この時点で、AutoCADのウィンドウ画面がまだ立ち上がった状態なのです。
普通でしたら右上の×ボタンをマウスでクリックしてウインドウを閉じます。
それを、自動で閉じたいわけです。ご理解いただけたでしょうか？
「何だそれくらい我慢しろ！」と怒られるかもしれませんね。すみません。
でも、出来る限り自動でやりたいと思っただけです。今、教えて頂いたソースを書き加えましたが
駄目でした。やはりAPI関数を使用しないと駄目でしょうか？私には敷居が高すぎます。
今のままでも十分使えるのですが、我慢しなくてはいけませんね。
もう少し、自分なりに頑張ってみます。もしご教授願えたら幸いです。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）