FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > ExcelSparkline クラス > ExcelSparkline コンストラクタ : ExcelSparkline コンストラクタ(Int32,Int32,SheetView,CellRange) |
'Declaration Public Function New( _ ByVal row As Integer, _ ByVal column As Integer, _ ByVal sheetView As SheetView, _ ByVal cellRange As CellRange _ )
'使用法 Dim row As Integer Dim column As Integer Dim sheetView As SheetView Dim cellRange As CellRange Dim instance As New ExcelSparkline(row, column, sheetView, cellRange)
fpSpread1.Sheets[0].SetClip(0, 0, 1, 5, "1\t2\t3\t4\t5"); fpSpread1.Sheets[0].SetClip(1, 0, 1, 5, "5\t4\t3\t2\t1"); fpSpread1.Sheets[0].SetClip(2, 0, 1, 5, "1\t2\t3\t2\t1"); FarPoint.Win.Spread.ExcelSparkline es = new FarPoint.Win.Spread.ExcelSparkline(0, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparkline es1 = new FarPoint.Win.Spread.ExcelSparkline(1, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparkline es2 = new FarPoint.Win.Spread.ExcelSparkline(2, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(2, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparklineGroup esg = new FarPoint.Win.Spread.ExcelSparklineGroup(new FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column); esg.Add(es); esg.Add(es1); esg.Add(es2); esg.Remove(es); fpSpread1.Sheets[0].SparklineContainer.Add(esg);
FpSpread1.Sheets(0).SetClip(0, 0, 1, 5, "1" + Chr(9) + "2" + Chr(9) + "3" + Chr(9) + "4" + Chr(9) + "5") FpSpread1.Sheets(0).SetClip(1, 0, 1, 5, "5" + Chr(9) + "4" + Chr(9) + "3" + Chr(9) + "2" + Chr(9) + "1") FpSpread1.Sheets(0).SetClip(2, 0, 1, 5, "1" + Chr(9) + "2" + Chr(9) + "3" + Chr(9) + "2" + Chr(9) + "1") Dim es As New FarPoint.Win.Spread.ExcelSparkline(0, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)) Dim es1 As New FarPoint.Win.Spread.ExcelSparkline(1, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)) Dim es2 As New FarPoint.Win.Spread.ExcelSparkline(2, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(2, 0, 1, 5)) Dim esg As New FarPoint.Win.Spread.ExcelSparklineGroup(New FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column) esg.Add(es) esg.Add(es1) esg.Add(es2) esg.Remove(es) FpSpread1.Sheets(0).SparklineContainer.Add(esg)