VB中向IE窗口发字符串(SendMessage好像不行)

来源:百度知道 编辑:UC知道 时间:2024/05/27 13:06:08
我用了
Call SendMessage(hwnd, WM_SETTEXT, 0, ByVal str)
这句语都不行啊
句柄都没有错啊
用按键精灵就可以发送(同一个句柄)

Private Sub Command1_Click()

Dim strTxt As String * 80
strTxt = "I love China" + Chr(0)
SendMessage Me.hwnd, WM_SETTEXT, 0, ByVal strTxt

End Sub

找到句柄后,用这个 API:SetWindowText,原型如下:
Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long

用法:Call SetWindowText(hwnd,"要发送的字符串!")