private void Form1_Load(object sender, System.EventArgs e)
{
// シートにデータを設定
fpSpread1.ActiveSheet.SetClip(0, 0, 1, 4, "売上\t店舗A\t店舗B");
fpSpread1.ActiveSheet.SetClip(1, 0, 1, 4, "商品XYZ\t20\t15");
fpSpread1.ActiveSheet.SetClip(2, 0, 1, 4, "商品ABC\t25\t18");
fpSpread1.ActiveSheet.SetClip(3, 0, 1, 4, "商品XYZ\t21\t19");
fpSpread1.ActiveSheet.SetClip(4, 0, 1, 4, "商品ABC\t30\t22");
fpSpread1.ActiveSheet.SetClip(5, 0, 1, 4, "商品XYZ\t8\t30");
fpSpread1.ActiveSheet.SetClip(6, 0, 1, 4, "商品ABC\t40\t8");
fpSpread1.ActiveSheet.SetClip(7, 0, 1, 4, "商品XYZ\t30\t9");
fpSpread1.ActiveSheet.SetClip(8, 0, 1, 4, "商品ABC\t12\t20");
// セル範囲を設定して集合箱ひげ図を作成します
fpSpread1.ActiveSheet.AddChart(new FarPoint.Win.Spread.Model.CellRange(0, 0, 9, 3), typeof(FarPoint.Win.Chart.ClusteredBoxWhiskerSeries), 250, 200, 250, 30);
FarPoint.Win.Chart.ClusteredBoxWhiskerSeries cboxseries = (FarPoint.Win.Chart.ClusteredBoxWhiskerSeries)fpSpread1.ActiveSheet.Charts[0].Model.PlotAreas[0].Series[0];
// データ系列の表示(ポイント、線、マーカー)を設定します
foreach (FarPoint.Win.Chart.BoxWhiskerSeries boxseries in cboxseries.Series)
{
boxseries.ShowInnerPoints = true;
boxseries.ShowMeanLine = true;
boxseries.ShowMeanMarkers = true;
boxseries.ShowOutlierPoints = true;
}
}
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
' シートにデータを設定
FpSpread1.ActiveSheet.SetClip(0, 0, 1, 4, "売上" + Chr(9) + "店舗A" + Chr(9) + "店舗B")
FpSpread1.ActiveSheet.SetClip(1, 0, 1, 4, "商品XYZ" + Chr(9) + "20" + Chr(9) + "15")
FpSpread1.ActiveSheet.SetClip(2, 0, 1, 4, "商品ABC" + Chr(9) + "25" + Chr(9) + "18")
FpSpread1.ActiveSheet.SetClip(3, 0, 1, 4, "商品XYZ" + Chr(9) + "21" + Chr(9) + "19")
FpSpread1.ActiveSheet.SetClip(4, 0, 1, 4, "商品ABC" + Chr(9) + "30" + Chr(9) + "22")
FpSpread1.ActiveSheet.SetClip(5, 0, 1, 4, "商品XYZ" + Chr(9) + "8" + Chr(9) + "30")
FpSpread1.ActiveSheet.SetClip(6, 0, 1, 4, "商品ABC" + Chr(9) + "40" + Chr(9) + "8")
FpSpread1.ActiveSheet.SetClip(7, 0, 1, 4, "商品XYZ" + Chr(9) + "30" + Chr(9) + "9")
FpSpread1.ActiveSheet.SetClip(8, 0, 1, 4, "商品ABC" + Chr(9) + "12" + Chr(9) + "20")
' セル範囲を設定して集合箱ひげ図を作成します
FpSpread1.ActiveSheet.AddChart(New FarPoint.Win.Spread.Model.CellRange(0, 0, 9, 3), GetType(FarPoint.Win.Chart.ClusteredBoxWhiskerSeries), 250, 200, 250, 30)
Dim cboxseries As FarPoint.Win.Chart.ClusteredBoxWhiskerSeries = DirectCast(FpSpread1.ActiveSheet.Charts(0).Model.PlotAreas(0).Series(0), FarPoint.Win.Chart.ClusteredBoxWhiskerSeries)
' データ系列の表示(ポイント、線、マーカー)を設定します
For Each boxseries As FarPoint.Win.Chart.BoxWhiskerSeries In cboxseries.Series
boxseries.ShowInnerPoints = True
boxseries.ShowMeanLine = True
boxseries.ShowMeanMarkers = True
boxseries.ShowOutlierPoints = True
Next
End Sub