FarPoint.Web.Spread.NamedStyle ns = new FarPoint.Web.Spread.NamedStyle("Style", "DataAreaDefault");
FarPoint.Web.Spread.Cell c;
ns.Border = new FarPoint.Web.Spread.Border(Color.Red);
c = FpSpread1.ActiveSheetView.Cells[0, 0];
FpSpread1.NamedStyles.Add(ns);
c.ParentStyleName = "Style";
Dim ns As New FarPoint.Web.Spread.NamedStyle("Style", "DataAreaDefault")
Dim c As FarPoint.Web.Spread.Cell
ns.Border = New FarPoint.Web.Spread.Border(Color.Red)
c = FpSpread1.ActiveSheetView.Cells(0, 0)
FpSpread1.NamedStyles.Add(ns)
c.ParentStyleName = "Style"