掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
exeソフトのボタンの遠隔操作するには? (ID:113708)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
いろいろすみませんでした。 自分で(ちょっと時間かかりましたが....)なんとか、プログラムを組むことができました。 が、またまた、問題が発生してしまいました。 Dim Atext As String Dim ChildWindowHandle As Long Dim Code As Long Atext="12345" 'テキスト Code =SendMessage(ChildWindowHandle,WM_SETTEXT,0,ByVal Atext) この、Atext="12345" の後に、エンターを押したいのですがどのようにすればわかりません。ただし、テキストボックスは1つだけなので、12345出力→エンター→6789のように続けて出力したいのですが......あと、スペースだと Atext=”12345” & Chr(4) ←こんな感じだと思うのですが、エンターの場合どのようにすればよいのでしょうか? それと、また同じ質問なのですが(何回もすみません)コマンドボタンを押す 指令がわからないのですが.... ' クラス名でウィンドウハンドルを取得 WindowClassName = "....." WindowHandle = _ FindWindow(WindowClassName,vbNullString) ' ウィンドウハンドルを取得できたときは If WindowHandle <> 0 Then ' クラス名で子ウィンドウハンドルを取得 WindowClassName = "----" ChildWindowHandle = _ FindWindowEx(WindowHandle,0,WindowClassName,vbNullString) ここまでは、何とかできました。この続きがわかりません。 いろいろ聞いてしまいすみません。かなりの初心者なので、もしよければ 何か、アドバイス等お願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.