datagrid select row

[luisve]

hi i am using the following code to select all the row in a datagrid when the user changes the current row using the keyboard, this works but the currect cell displays the cursor keyboard cursor(|) how can i avoid this and select all the row in the same color and witout the cursor?

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGrid1.CurrentCellChanged
Dim pt = DataGrid1.CurrentCell.RowNumber
DataGrid1.CurrentCell = New DataGridCell(pt, DataGrid1.CurrentCell.ColumnNumber)
DataGrid1.Select(pt)
end sub