请教:如何向一个指定的窗口发按键的消息?

Question

如题!
keybd_event不能实现的

Answer 1

SendMessage
WM_Char、WM_KeyDown、WM_KeyUp

Answer 2

Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Const WM_CHAR = &H102Private Sub Command1_Click()
    SendMessage Me.hwnd, WM_CHAR, Asc(Text1.Text), 0
End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)
    Me.Print Chr(KeyAscii)
End Sub
---------------------------
http://community.csdn.net/Expert/topic/3464/3464303.xml?temp=.3915216