Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles MyBase.KeyDown Select Case e.KeyCode Case Keys.Up DVD_ListBindingSource.MovePrevious() e.Handled = True Case Keys.Down DVD_ListBindingSource.MoveNext() e.Handled = True End Select End Sub
KeyPreview = True
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)