Public Function New( _
   ByVal color As Color _
)

Dim color As Color
 
Dim instance As New SolidLine(color)

public SolidLine( 
   Color color
)

FarPoint.Web.Chart.AreaSeries aseries = new FarPoint.Web.Chart.AreaSeries();
FarPoint.Web.Chart.AreaSeries aseries1 = new FarPoint.Web.Chart.AreaSeries();

        protected void Page_Load(object sender, EventArgs e)
    {
        aseries.SeriesName = "Series1";
        aseries.Values.Add(2);
        aseries.Values.Add(4);
        aseries.Values.Add(3);
        aseries.Values.Add(5);
        aseries.AreaFill = new FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Aquamarine,System.Drawing.Color.DarkBlue);

        aseries1.SeriesName = "Series2";
        aseries1.Values.Add(1);
        aseries1.Values.Add(2);
        aseries1.Values.Add(4);
        aseries1.Values.Add(8);
        aseries1.AreaFill = new FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Coral, System.Drawing.Color.Crimson);
        aseries1.AreaBorder = new FarPoint.Web.Chart.SolidLine(System.Drawing.Color.DarkSalmon);

        FarPoint.Web.Chart.YPlotArea plotArea = new FarPoint.Web.Chart.YPlotArea();
        plotArea.Location = new System.Drawing.PointF(0.2F, 0.2F);
        plotArea.Size = new System.Drawing.SizeF(0.6F, 0.6F);
        plotArea.Series.Add(aseries);
        plotArea.Series.Add(aseries1);

        FarPoint.Web.Chart.ChartModel model = new FarPoint.Web.Chart.ChartModel();
        model.PlotAreas.Add(plotArea);
        FarPoint.Web.Spread.Chart.SpreadChart chart = new FarPoint.Web.Spread.Chart.SpreadChart();
        chart.Model = model;
        FpSpread1.Sheets[0].Charts.Add(chart);       
    }

    protected void Button1_Click(object sender, EventArgs e)
    {
        aseries.Values.Clear();
        aseries1.Values[3] = 1;
        double v;
        v = aseries1.Values[3];
        textBox1.Text = v.ToString();
        aseries1.AreaFills[1] = new FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Aquamarine,System.Drawing.Color.DarkBlue);
        object effect;
        effect = aseries1.AreaFills[1];
       textBox1.Text = effect.ToString();
    }

Dim aseries As New FarPoint.Web.Chart.AreaSeries
Dim aseries1 As New FarPoint.Web.Chart.AreaSeries

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
aseries.SeriesName = "Series1"
aseries.Values.Add(2.0)
aseries.Values.Add(4.0)
aseries.Values.Add(3.0)
aseries.Values.Add(5.0)
aseries.AreaFill = New FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Aquamarine, System.Drawing.Color.DarkBlue)

aseries1.SeriesName = "Series2"
aseries1.Values.Add(1.0)
aseries1.Values.Add(2.0)
aseries1.Values.Add(4.0)
aseries1.Values.Add(8.0)
aseries1.AreaFill = New FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Coral, System.Drawing.Color.Crimson)
aseries1.AreaBorder = New FarPoint.Web.Chart.SolidLine(System.Drawing.Color.DarkSalmon)

Dim plotArea As New FarPoint.Web.Chart.YPlotArea()
plotArea.Location = New System.Drawing.PointF(0.2F, 0.2F)
plotArea.Size = New System.Drawing.SizeF(0.6F, 0.6F)
plotArea.series.Add(aseries)
plotArea.series.Add(aseries1)

Dim model As New FarPoint.Web.Chart.ChartModel()
model.PlotAreas.Add(plotArea)
Dim chart As New FarPoint.Web.Spread.Chart.SpreadChart()
chart.Model = model
FpSpread1.Sheets(0).Charts.Add(chart)
End Sub

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
aseries.Values.Clear()
aseries1.Values(3) = 1

Dim v As Double
v = aseries1.Values(3)
TextBox1.Text = v.ToString()

aseries1.AreaFills(1) = New FarPoint.Web.Chart.GradientFill(System.Drawing.Color.Aquamarine, System.Drawing.Color.DarkBlue)
Dim effect As Object
effect = aseries1.AreaFills(1)
TextBox1.Text = effect.ToString()
End Sub