private void fpSpread1_SelectionChanged(object sender, FarPoint.Win.Spread.SelectionChangedEventArgs e)
{
FarPoint.Win.Spread.Model.CellRange cr;
cr = e.Range;
e.View.Sheets[0].Cells[cr.Row, cr.Column, cr.RowCount, cr.ColumnCount].BackColor = Color.Teal;
}
Private Sub FpSpread1_SelectionChanged(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.SelectionChangedEventArgs) Handles
FpSpread1.SelectionChanged
Dim cr As FarPoint.Win.Spread.Model.CellRange
cr = e.Range
e.View.Sheets(0).Cells(cr.Row, cr.Column, cr.RowCount, cr.ColumnCount).BackColor = Color.Teal
End Sub