VB怎么静音自动点击网页上的按钮

webbrowser1.document.all.submit.click会发出声音,怎么静音或者说是不是还有其他静音自动点击网页上按钮的方法

Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const jingyin = 173 '静音

Private Sub command1_click()
keybd_event jingyin, 0, 0, 0
End Sub