KeyDown событие не работает в ListView

Question

Это мой код для KeyDown:

If e.KeyCode = Keys.Enter Then 
     'find the item to be selected 
     lvBranch.FindItemWithText(txtFind.Text, True, 0, False).Selected = True 
    End If 

, когда я нажимаю войти, он не работает, но когда я делаю тест как MsgBox, когда я нажимаю войти, он работает. Код предназначен для выбора записи в списке, которая соответствует значению txtFind.

Спасибо заранее

Answer 1

Ваш код работает, все, что вам нужно отправить фокус к lvBranch

Этот код должен быть в KeyDown событие для txtFind

If e.KeyCode = Keys.Enter Then 
    Dim Result As ListViewItem = lvBranch.FindItemWithText(txtFind.Text, True, 0, False) 
    If (Not Result Is Nothing) Then 
     lvBranch.Focus() 
     Result.Selected = True 
    End If 
End If