主题：[求助]模拟键盘输入失败

请教模拟键盘输入，具体流程是在表A中点击button后下移一行,打开百度网站输入s值后进行回车搜索，但执行后百度搜索框未输入任何内容

Dim s As String
With Tables("行政区域")
    .Position = .Position + 1
    s=.current("县市")
End With
Dim brw As WinForm.WebBrowser=e.Form.controls("WebBrowser1")
brw.Address = "http://www.baidu.com/"
'brw.Select

'System.Threading.Thread.Sleep(2000)
Sendkeys.Sendwait(s)
Sendkeys.Sendwait("{ENTER}")