private void ChangeCellColor(FarPoint.Web.Spread.FpSpread s, FarPoint.Web.Spread.Cell c, FarPoint.Web.Spread.Appearance a)
{
s.ActiveSheetView.Cells[c.Row.Index, c.Column.Index].BackColor = a.BackColor;
}
FarPoint.Web.Spread.Appearance appr = new FarPoint.Web.Spread.Appearance();
appr.BackColor = Color.Red;
bool b;
FarPoint.Web.Spread.Appearance appr1 = new FarPoint.Web.Spread.Appearance(appr);
FarPoint.Web.Spread.Cell c;
c = FpSpread1.ActiveSheetView.Cells[1, 1];
ChangeCellColor(FpSpread1, c, appr1);
b = appr.IsEmpty();
TextBox1.Text = b.ToString();
Private Sub ChangeCellColor(ByVal s As FarPoint.Web.Spread.FpSpread, ByVal c As FarPoint.Web.Spread.Cell, ByVal a As FarPoint.Web.Spread.Appearance)
s.ActiveSheetView.Cells(c.Row.Index, c.Column.Index).BackColor = a.BackColor
End Sub
Dim appr As New FarPoint.Web.Spread.Appearance
appr.BackColor = Color.Red
Dim b As Boolean
Dim appr1 As New FarPoint.Web.Spread.Appearance(appr)
Dim c As FarPoint.Web.Spread.Cell
c = FpSpread1.ActiveSheetView.Cells(1, 1)
ChangeCellColor(FpSpread1, c, appr)
b = appr.IsEmpty()
TextBox1.Text = b.ToString()