Vb6 SendKeys"^f"；无法使用其他快捷键

我有一个带有webbrowser控件和按钮（查找按钮）的表单 下面是查找按钮的代码。Web浏览器控件包含一些文本，单击“查找”按钮时，将打开“查找”对话框。我们使用SendKeys“^f”打开“查找”对话框

但是，当我使用“查找”按钮的快捷键（Alt+N）时，“查找”对话框不会打开

有人能帮忙吗

Private Sub cmdFind_Click()
  On Error GoTo ErrorHandler

  WebBrowser1.SetFocus
  WebBrowser1.Refresh2
  SendKeys "^f"

  Exit Sub
ErrorHandler:

End Sub

---

我不知道发生了什么，但我怀疑按键干扰了发送键。使用ExecWB方法，而不必担心如何完成该工作

Private Sub cmdFind_Click()
    On Error GoTo ErrorHandler

    WebBrowser1.SetFocus
    WebBrowser1.ExecWB OLECMDID_FIND, OLECMDEXECOPT_DODEFAULT

    Exit Sub
ErrorHandler:

End Sub