О GeckoWebBrowser KeyEvent - PullRequest
       4

О GeckoWebBrowser KeyEvent

0 голосов
/ 09 сентября 2018

Я хочу отправить код ключа в GeckoWebBrowser, источник html, как показано ниже:

<code><input onkeypress="return event.charCode >= 48 ; event.charCode <= 57" disabled="" id="field1" type="tel" value="" pattern="[0-9]*">

код VB.NET: Dim ev As DomEventArgs = GeckoWebBrowser1.Document.CreateEvent ("KeyEvents") Dim curInput As GeckoInputElement curInput = GeckoWebBrowser1.Document.GetElementById (" field1 ") curInput.Focus () nsIEventVar.InitKeyEvent (New nsAString (" keypress "), True, False, GeckoWeb.Dom., False, Keys.Enter, Keys.NumPad0) nsIEventVar.InitKeyEvent (New nsAString ("keyUp"), True, False, GeckoWebBrowser1.Window.DomWindow, False, False, False, False, Keys.Up, Keys.NumPad0 X).QueryInterface (Of nsIDOMEventTarget) (curInput.DomObject) .DispatchEvent (nsIEventVar)

, но неудачная отправка 0 в элемент управления вводом.

...