Function GetRangeGroupInfo( _
   ByVal level As Integer, _
   ByVal isRowGroup As Boolean _
) As RangeGroupInfo()

Dim instance As IRangeGroupSupport
Dim level As Integer
Dim isRowGroup As Boolean
Dim value() As RangeGroupInfo
 
value = instance.GetRangeGroupInfo(level, isRowGroup)

RangeGroupInfo[] GetRangeGroupInfo( 
   int level,
   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;
}
FarPoint.Win.Spread.RangeGroupInfo[] rgi = rangeGroupSupport.GetRangeGroupInfo(2, true);
rangeGroupSupport.ExpandRangeGroup(rgi[0], true, true);

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 rgi() As FarPoint.Win.Spread.RangeGroupInfo = rangeGroupSupport.GetRangeGroupInfo(2, True)
rangeGroupSupport.ExpandRangeGroup(rgi(0), True, True)