FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread.Model 名前空間 > IRangeSupport インタフェース : AddRows メソッド |
'使用法 Dim instance As IRangeSupport Dim row As Integer Dim rowCount As Integer instance.AddRows(row, rowCount)
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