Я установил очень простое приложение с элементом управления веб-браузером и невидимой панелью с 2 кнопками и текстовым полем для ввода URL-адреса.Me.Keyup не работает, если я не делаю панель видимой, а затем нажмите кнопку, чтобы закрыть ее.
Когда я запускаю приложение, количество нажатий клавиш ничего не сделает даже с нелепо простым кодом, подобным этому.
Private Sub Frm_Main_Load(sender As Object, e As System.EventArgs) Handles Me.Load
My.Settings.Reload()
Dim URL As New Uri(Application.StartupPath & "\" & My.Settings.path)
WebBrowser1.Url = URL
TXT_URL.Text = My.Settings.path
Me.KeyPreview = True
End Sub
Private Sub Frm_Main_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
Beep()
End Sub
Однако если выбрать пункт меню, чтобы отобразить панель затем сразу же нажмите на кнопку на панели, чтобы установить pnl_url.visible = ложь, то я могу нажать клавиши и получить ответ от рутины KeyUp.
Любые идеи? Я не могу понять, что делать, чтобы заставить приложение tostart принимать нажатия клавиш, не заставляя пользователя нажать что-нибудь. me.focus или «control». Фокус тоже ничего не делает.
написана в Visual Studio 2010
** * ** * ** * ** * ** * ** * *EDIT* ** * ** * ** * ** * ** * ** * ** * ** * *** я понял, что это управление веб-браузер это задыхалось, но не могло понять, как заставить его сотрудничать. мой друг исправил это для меня.
Private Sub WebBrowser1_PreviewKeyDown(sender As Object, e As System.Windows.Forms.PreviewKeyDownEventArgs) Handles WebBrowser1.PreviewKeyDown
Dim ee As New KeyEventArgs(e.KeyData)
Me.Frm_Main_KeyUp(sender, ee)
End Sub