FarPoint.Win.Spread.Model.BaseSheetSelectionModel selModel;
selModel = (FarPoint.Win.Spread.Model.BaseSheetSelectionModel)fpSpread1.ActiveSheet.Models.Selection;
selModel.SetSelection(0, 0, 3, 3);
bool b;
b = selModel.IsEmpty();
if(b == false)
{
fpSpread1.ActiveSheet.SelectionStyle = FarPoint.Win.Spread.SelectionStyles.SelectionColors;
fpSpread1.ActiveSheet.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.Range;
fpSpread1.ActiveSheet.SelectionUnit = FarPoint.Win.Spread.Model.SelectionUnit.Cell;
fpSpread1.ActiveSheet.SelectionBackColor = Color.Yellow;
}
Dim selModel As FarPoint.Win.Spread.Model.BaseSheetSelectionModel
selModel = fpSpread1.ActiveSheet.Models.Selection
selModel.SetSelection(0, 0, 3, 3)
Dim b As Boolean
b = selModel.IsEmpty()
If b = False Then
fpSpread1.ActiveSheet.SelectionStyle = FarPoint.Win.Spread.SelectionStyles.SelectionColors
fpSpread1.ActiveSheet.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.Range
fpSpread1.ActiveSheet.SelectionUnit = FarPoint.Win.Spread.Model.SelectionUnit.Cell
fpSpread1.ActiveSheet.SelectionBackColor = Color.Yellow
End If