SendMessage 函数发送文本

SendMessage function to send text

我有一个表单,在表单上我有一个 Web 浏览器,目前在上面打开 google.com。

光标已经聚焦在搜索上window。 我一直在尝试使用 SendMessage 将搜索文本发送到 WebBrowser 控件,但没有成功。当前代码。

Const WM_SETTEXT As Integer = &HC

Dim hdle As IntPtr = WebBrowser1.Handle

SendMessage(hdle, WM_SETTEXT, 0, "test")

为什么它不向 google 重点搜索标签发送文本?我该如何解决这个问题?

P.S : 我不想使用 SendKeys 或 HTML 方法来设置文本。我只想使用处理程序。

Web 浏览器控件的 window 句柄不是文本编辑控件的 window 句柄。所以您没有将消息发送到您想要的控件。

事实上,我所知道的每个主流浏览器都不使用 windowed 控件。因此文本 window 甚至没有 window 句柄,因此再多的工作也无法使您的基本概念成功。

使用 UI 自动化可以最好地实现您正在尝试做的事情。