PowerTools SPREAD for Windows Forms 8.0J
AddRows メソッド (IRangeSupport)


後ろに行を追加する行インデックス
追加する行数
指定した行の後に行を追加します。
構文
'Declaration
 
Sub AddRows( _
   ByVal row As Integer, _
   ByVal rowCount As Integer _
) 
'使用法
 
Dim instance As IRangeSupport
Dim row As Integer
Dim rowCount As Integer
 
instance.AddRows(row, rowCount)
void AddRows( 
   int row,
   int rowCount
)

パラメータ

row
後ろに行を追加する行インデックス
rowCount
追加する行数
次のサンプルコードは、IRangeSupportインタフェースを使用してアクティブシートに列と行を追加します。
FarPoint.Win.Spread.Model.IRangeSupport irs;
DialogResult dlg;
irs = (FarPoint.Win.Spread.Model.IRangeSupport)fpSpread1.ActiveSheet.Models.Data;
fpSpread1.ActiveSheet.ColumnCount = 2;
fpSpread1.ActiveSheet.RowCount = 2;
dlg = MessageBox.Show("Do you want to add some columns and rows?", "AddColumns", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
irs.AddColumns(1, 3);
irs.AddRows(1, 3);
}
Dim irs As FarPoint.Win.Spread.Model.IRangeSupport
Dim dlg As DialogResult
irs = FpSpread1.ActiveSheet.Models.Data
FpSpread1.ActiveSheet.ColumnCount = 2
FpSpread1.ActiveSheet.RowCount = 2
dlg = MessageBox.Show("Do you want to add some columns and rows?", "AddColumns", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
irs.AddColumns(1, 3)
irs.AddRows(1, 3)
End If
参照

IRangeSupport インタフェース
IRangeSupport メンバ

 

 


© 2004-2015, GrapeCity inc. All rights reserved.