タイトル : Re^4: sleep関数の待機について 投稿日 : 2008/09/12(Fri) 10:35 投稿者 : 悩める子羊
御助言有難う御座います。 >> Private Sub Command1_Click() > Dim TaskID As Long > Dim hProcess As Long > Dim Ret As Long > > TaskID = Shell("C:\Program Files\CAD\***.exe", vbMaximizedFocus) > > hProcess = OpenProcess(SYNCHRONIZE, False, TaskID) > If hProcess = 0 Then > MsgBox "ハンドルが取得できません" > Exit Sub > End If > Ret = WaitForInputIdle(hProcess, &HFFFF) > Call CloseHandle(hProcess) > MsgBox "表示しました" > End Sub おっしゃる通りに記述して動かしました。 CADは、起動しましたが、その後の処理をしません。 CADを、起動待機させて後に「Sendkeys」を二行程、動かしたいのですが 全然、反応がありません。上のソースのどこに入れれば「Sendkeys」が 動くのでしょうか。宜しく、お願いします。 【全文引用を避け、必要な部分のみを引用するようにして下さい。】 |