VBA 将 Enter 键发送到 HTMLInputElement

Question

我希望这是一个简单的问题。我有一些代码在其中加载网页并在 IE 的字段中输入一个数字。如下：

Option Explicit

Private Sub GettingCashAvail()

Dim IE          As InternetExplorerMedium
Dim HTMLDoc     As HTMLDocument
Dim IEField     As HTMLInputElement

Set IE = New InternetExplorerMedium

IE.navigate "https://website.com/login.aspx"

While IE.Busy
    DoEvents
Wend

Do Until IE.statusText = "Done"
    DoEvents
Loop

Set HTMLDoc = IE.document

Set IEField = HTMLDoc.getElementById("ucGetAccountNumber_txtAccountNumber")

IEField.Value = "#########"

现在该字段支持按回车键移动到下一页。我可以为提交按钮调暗第二个对象，然后执行 IESubmit.Click 之类的操作以输入信息并导航到新屏幕，但我想做的是以某种方式发送返回键。以下是我感兴趣的网页源代码部分：

onkeypress="return clickButton(event,'ucGetAccountNumber_btnSubmit')"

您认为有什么方法可以简单地发送回车键吗？如果是的话，感谢您的想法，如果不是，我可以将该提交按钮设置为第二个输入对象。

Answer 1

你可以使用：

IE.Visible = True
Application.SendKeys "~" '## send the "Enter" keystroke

但在我尝试使用SendKeys 方法时，它们不是很可靠，大多数人会建议使用不同的方法。

我个人认为最好创建另一个对象变量并调用按钮的.Click 方法，如您所指出的。