FarPoint.Web.Spread.NamedStyleCollection nsc = new FarPoint.Web.Spread.NamedStyleCollection();
FarPoint.Web.Spread.NamedStyle ns = new FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault");
int i;
ns.BackColor = Color.Yellow;
ns.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue);
nsc.Add(ns);
FpSpread1.NamedStyles.Add(nsc[0]);
FpSpread1.ActiveSheetView.DefaultStyle = nsc[0];
i = nsc.Count;
TextBox1.Text = i.ToString();
Dim nsc As New FarPoint.Web.Spread.NamedStyleCollection
Dim ns As New FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault")
Dim i As Integer
ns.BackColor = Color.Yellow
ns.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue)
nsc.Add(ns)
FpSpread1.NamedStyles.Add(nsc(0))
FpSpread1.ActiveSheetView.DefaultStyle = nsc(0)
i = nsc.Count
TextBox1.Text = i.ToString()