FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > DefaultSparklineContainer クラス : RemoveSparkline メソッド |
'Declaration Public Function RemoveSparkline( _ ByVal row As Integer, _ ByVal column As Integer _ ) As Boolean
'使用法 Dim instance As DefaultSparklineContainer Dim row As Integer Dim column As Integer Dim value As Boolean value = instance.RemoveSparkline(row, column)
fpSpread1.Sheets[0].SetClip(0, 0, 1, 5, "1\t2\t3\t4\t5"); FarPoint.Win.Spread.ExcelSparkline es = new FarPoint.Win.Spread.ExcelSparkline(0, 5, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(0, 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); fpSpread1.Sheets[0].SparklineContainer.Add(esg); fpSpread1.Sheets[0].SetClip(1, 0, 1, 5, "1\t2\t3\t4\t5"); FarPoint.Win.Spread.ExcelSparkline addES = new FarPoint.Win.Spread.ExcelSparkline(1, 5, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)); fpSpread1.Sheets[0].SparklineContainer.RemoveSparkline(0, 5);
fpSpread1.Sheets(0).SetClip(0, 0, 1, 5, "1" & vbTab & "2" & vbTab & "3" & vbTab & "4" & vbTab & "5") Dim es As New FarPoint.Win.Spread.ExcelSparkline(0, 5, fpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)) Dim esg As New FarPoint.Win.Spread.ExcelSparklineGroup(New FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column) esg.Add(es) fpSpread1.Sheets(0).SparklineContainer.Add(esg) fpSpread1.Sheets(0).SetClip(1, 0, 1, 5, "1" & vbTab & "2" & vbTab & "3" & vbTab & "4" & vbTab & "5") Dim addES As New FarPoint.Win.Spread.ExcelSparkline(1, 5, fpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)) fpSpread1.Sheets(0).SparklineContainer.RemoveSparkline(0, 5)