GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType ncell1 = new GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType();
ncell1.NegativeColor = Color.Red;
ncell1.UseNegativeColor = true;
fpSpread1.Sheets[0].Cells[1, 1].CellType = ncell1;
fpSpread1.Sheets[0].Cells[1, 1].Value = -1;
Dim ncell1 As New GrapeCity.Win.Spread.InputMan.CellType.GcNumberCellType()
ncell1.NegativeColor = Color.Red
ncell1.UseNegativeColor = True
FpSpread1.Sheets(0).Cells(1, 1).CellType = ncell1
FpSpread1.Sheets(0).Cells(1, 1).Value = -1