Spread Windows Forms 8.0 Product Documentation
Swap Method (IRangeSupport)
Example 


Row index from which to begin the swap
Column index from which to begin the swap
Row index of the destination range
Column index of the destination range
Number of rows to swap
Number of columns to swap
Swaps a range of cells from one specified location to another.
Syntax
'Declaration
 
Sub Swap( _
   ByVal fromRow As Integer, _
   ByVal fromColumn As Integer, _
   ByVal toRow As Integer, _
   ByVal toColumn As Integer, _
   ByVal rowCount As Integer, _
   ByVal columnCount As Integer _
) 
'Usage
 
Dim instance As IRangeSupport
Dim fromRow As Integer
Dim fromColumn As Integer
Dim toRow As Integer
Dim toColumn As Integer
Dim rowCount As Integer
Dim columnCount As Integer
 
instance.Swap(fromRow, fromColumn, toRow, toColumn, rowCount, columnCount)
void Swap( 
   int fromRow,
   int fromColumn,
   int toRow,
   int toColumn,
   int rowCount,
   int columnCount
)

Parameters

fromRow
Row index from which to begin the swap
fromColumn
Column index from which to begin the swap
toRow
Row index of the destination range
toColumn
Column index of the destination range
rowCount
Number of rows to swap
columnCount
Number of columns to swap
Example
This example swaps the data between the specified range and the specified location.
FarPoint.Win.Spread.Model.IRangeSupport irs;
DialogResult dlg;
Random r = new Random();
int i, j;
for (i = 0; i<=4; i++)
{
for (j = 0; j<=4; j++)
fpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString());
}
irs = (FarPoint.Win.Spread.Model.IRangeSupport)fpSpread1.ActiveSheet.Models.Data;
dlg = MessageBox.Show("Do you want to swap some data?", "Swap", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
irs.Swap(0, 0, 2, 2, 2, 2);
}
Dim irs As FarPoint.Win.Spread.Model.IRangeSupport
Dim dlg As DialogResult
Dim r As New Random()
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 4
FpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString())
Next j
Next i
irs = FpSpread1.ActiveSheet.Models.Data
dlg = MessageBox.Show("Do you want to swap some data?", "Swap", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
irs.Swap(0, 0, 2, 2, 2, 2)
End If
Requirements

Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8

See Also

Reference

IRangeSupport Interface
IRangeSupport Members

 

 


Copyright © GrapeCity, inc. All rights reserved.