How to trigger the SelectionChanged event by Keypress in WinForms GridControl?

//Method 1
this.grid.ListBoxSelectionMode = SelectionMode.One;
 
//Method2
this.grid.CurrentCellMoving += new GridCurrentCellMovingEventHandler(grid_CurrentCellMoving);
this.grid.SelectionChanged += new GridSelectionChangedEventHandler(grid_SelectionChanged);
 
void grid_CurrentCellMoving(object sender, GridCurrentCellMovingEventArgs e)
{
    this.grid.Selections.Add(GridRangeInfo.Row(e.RowIndex));
}
 
void grid_SelectionChanged(object sender, GridSelectionChangedEventArgs e)
{
    if (e.Reason == GridSelectionReason.SelectRange)
    {
       MessageBox.Show("SelectionChanged Event fired");
       GridRangeInfo range = e.Range;
    }
 }

'Method 1
 Me.grid.ListBoxSelectionMode = SelectionMode.One
'Method2
 AddHandler grid.CurrentCellMoving, AddressOf grid_CurrentCellMoving
Me.grid.SelectionChanged += New GridSelectionChangedEventHandler(grid_SelectionChanged)
 
 Private Sub grid_CurrentCellMoving(ByVal sender As Object, ByVal e As       GridCurrentCellMovingEventArgs)
   Me.grid.Selections.Add(GridRangeInfo.Row(e.RowIndex))
  End Sub
 
Private Sub grid_SelectionChanged(sender As Object, e As GridSelectionChangedEventArgs)
   If e.Reason = GridSelectionReason.SelectRange Then
     MessageBox.Show("SelectionChanged Event fired")
     Dim range As  GridRangeInfo = e.Range
   End If
End Sub