Private Sub Command1_Click()
MSFlexGrid1.HighLight = flexHighlightAlways
MSFlexGrid1.SelectionMode = flexSelectionByRow
MSFlexGrid1.FocusRect = flexFocusNone
MSFlexGrid1.Row = MSFlexGrid1.Rows - 1
MSFlexGrid1.RowSel = MSFlexGrid1.Rows - 1
MSFlexGrid1.Col = 0
MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1
End Sub