FarPoint.Web.Spread.NamedStyleCollection nsc = new FarPoint.Web.Spread.NamedStyleCollection();
FarPoint.Web.Spread.NamedStyle ns = new FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault");
FarPoint.Web.Spread.NamedStyle ns1 = new FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault");
ns.BackColor = Color.Yellow;
ns.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue);
ns1.BackColor = Color.Teal;
ns1.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red);
nsc.AddRange(new Object[] {ns, ns1});
object[] c = new Object[nsc.Count];
nsc.CopyTo(c, 0);
FpSpread1.NamedStyles.Add((FarPoint.Web.Spread.NamedStyle)c[0]);
FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = (FarPoint.Web.Spread.NamedStyle)c[0];
Dim nsc As New FarPoint.Web.Spread.NamedStyleCollection
Dim ns As New FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault")
Dim ns1 As New FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault")
ns.BackColor = Color.Yellow
ns.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue)
ns1.BackColor = Color.Teal
ns1.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red)
nsc.AddRange(New Object() {ns, ns1})
Dim c(nsc.Count)
nsc.CopyTo(c, 0)
FpSpread1.NamedStyles.Add(c(0))
FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = c(0)