C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[4]: キーコード送信

分類:[VB.NET/VB2005]　

SendMessageで書き直したいのですが、どのように書き直せばよいのか教えてください。
（VB2005です）↓

'キーコード送信
Dim DownUp As Integer = 0
Dim Down As Integer = 1
Dim Up As Integer = 2
Private Sub KBD(ByVal KEY_CODE As Byte, ByVal 状態 As Integer, ByVal ms As Integer)
Sleep(ms)
If 状態 = 1 Then
Call keybd_event(KEY_CODE, 0, 0, 0)
ElseIf 状態 = 2 Then
Call keybd_event(KEY_CODE, 0, &H2, 0)
ElseIf 状態 = 0 Then
Call keybd_event(KEY_CODE, 0, 0, 0)
Call keybd_event(KEY_CODE, 0, &H2, 0)
Else
End If
End Sub

わざわざSendMessageにする理由が分かりませんケド・・・？
元々API使ってらっしゃるので、細かいとこは抜きマス。

基本はkeybd_eventの呼んでいるところを置き換えでしょうか。
SendMessage(hWnd, msg, wParam, lParam)
hWnd : アクティブなコントロール（ウィンドウ）のhWnd（Handle）を渡す。
msg : WM_KEYDOWN = &H0100
: WM_KEYUP = &H0101
wParam : 仮想キーコード
lParam : キーデータ（0でもいいかも）

.NETならSystem.Windows.Forms.Sendkeysじゃダメなんでしょうか。

■No10265 (カンタービレさん) に返信

返信ありがとうございます。
先ほど置き換えてみたのですが、動きませんでした。
初心者なので、置き換え方が間違っていたかもしれません。
上記を完全に置き換えると、どんな感じになるのでしょうか？

お恥ずかしいのですが、アドバイスお願いします。

> 先ほど置き換えてみたのですが、動きませんでした。
> 初心者なので、置き換え方が間違っていたかもしれません。
> 上記を完全に置き換えると、どんな感じになるのでしょうか？
> 
完全って・・・今の内容で完全なんて無理デス。
元々したいコト、なんでしょうか？
元々どういうキーコードがどこに送信される前提のプログラムなんでしょうか？

そして今回もどう置き換えたか、読んでも分かりませんよネ？
どう動かなかったのか、エラー出てないのか・・・。

書き込まれた内容だけで推測するにはあまりに乏しいデスよ。
そもそもSendMessageに置き換えること自体がいいのかも分かりません。
なんでSendMessageじゃないといけないのかも理由を明確にしましょう。

■No10301 (zin さん) に返信
> 上記を完全に置き換えると、どんな感じになるのでしょうか？
>
keybd_event ってAPIのですよね？
であれば、置き換えは不可能というか代替手段そのものがありません。

keybd_event API は、キーボード上のキーを押したということを
ソフトウェア的にエミュレーションするAPIです。
そのため、どのキー(KEY_CODEに当たる部分)を押した、離した
ということを実際にキーボードを押す代わりに機械的に行うようにする
というAPIです。

.NET Framework には類似の機能として、System.Windows.Forms.SendKeys という
クラスのSendメソッドで代用することができますが、
残念ながら、このクラスには、キーを押すだけ、キーを離すだけという
仕組みが用意されていません。

そのため、現状のコードを別のAPIなどを使って完全に置き換えることは不可能となります。

ようするに、何をしたいのかが明確になっていないとどうにもならんということですｗ

C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

Re[4]: キーコード送信

過去ログには書き込み不可