FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > IRangeGroupSupport インタフェース : GetRangeGroupLevels メソッド |
'Declaration Function GetRangeGroupLevels( _ ByVal isRowGroup As Boolean _ ) As Integer
'使用法 Dim instance As IRangeGroupSupport Dim isRowGroup As Boolean Dim value As Integer value = instance.GetRangeGroupLevels(isRowGroup)
int GetRangeGroupLevels( bool isRowGroup )
fpSpread1.ActiveSheet.AddRangeGroup(0, 20, true); fpSpread1.ActiveSheet.AddRangeGroup(0, 10, true); fpSpread1.ActiveSheet.RangeGroupBackGroundColor = Color.Yellow; fpSpread1.ActiveSheet.RangeGroupButtonStyle = FarPoint.Win.Spread.RangeGroupButtonStyle.Enhanced; FarPoint.Win.Spread.IRangeGroupSupport rangeGroupSupport = ((FarPoint.Win.Spread.IRangeGroupSupport)(fpSpread1.ActiveSheet)); if ((rangeGroupSupport == null)) { return; } int i = rangeGroupSupport.GetRangeGroupLevels(true); if ((i > 0)) { MessageBox.Show(("The number of group levels is " + i.ToString())); }
FpSpread1.ActiveSheet.AddRangeGroup(0, 20, True) FpSpread1.ActiveSheet.AddRangeGroup(0, 10, True) FpSpread1.ActiveSheet.RangeGroupBackGroundColor = Color.Yellow FpSpread1.ActiveSheet.RangeGroupButtonStyle = FarPoint.Win.Spread.RangeGroupButtonStyle.Enhanced Dim rangeGroupSupport As FarPoint.Win.Spread.IRangeGroupSupport = CType(FpSpread1.ActiveSheet, FarPoint.Win.Spread.IRangeGroupSupport) If rangeGroupSupport Is Nothing Then Return End If Dim i As Integer = rangeGroupSupport.GetRangeGroupLevels(True) If i > 0 Then MessageBox.Show("The number of group levels is " & i.ToString()) End If