掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
SendMessage (ID:138120)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
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
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.