'Declaration Public Overridable Function Find( _ ByVal row As Integer, _ ByVal column As Integer _ ) As CellRange
'使用法 Dim instance As BaseSheetSpanModel Dim row As Integer Dim column As Integer Dim value As CellRange value = instance.Find(row, column)
private void menuItem1_Click(object sender, System.EventArgs e) { FarPoint.Win.Spread.Model.BaseSheetSpanModel spanModel; spanModel = (FarPoint.Win.Spread.Model.BaseSheetSpanModel)fpSpread1.ActiveSheet.Models.Span; spanModel.Add(0, 0, 2, 2); } private void menuItem2_Click(object sender, System.EventArgs e) { FarPoint.Win.Spread.Model.BaseSheetSpanModel spanModel; FarPoint.Win.Spread.Model.CellRange cr; spanModel = (FarPoint.Win.Spread.Model.BaseSheetSpanModel)fpSpread1.ActiveSheet.Models.Span; cr = spanModel.Find(1, 1); listBox1.Items.AddRange(new Object[] {cr.Column.ToString(), cr.Row.ToString(), cr.ColumnCount.ToString(), cr.RowCount.ToString()}); }
Private Sub MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem1.Click Dim spanModel As FarPoint.Win.Spread.Model.BaseSheetSpanModel spanModel = FpSpread1.ActiveSheet.Models.Span spanModel.Add(0, 0, 2, 2) End Sub Private Sub MenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click Dim spanModel As FarPoint.Win.Spread.Model.BaseSheetSpanModel Dim cr As FarPoint.Win.Spread.Model.CellRange spanModel = FpSpread1.ActiveSheet.Models.Span cr = spanModel.Find(1, 1) ListBox1.Items.AddRange(New Object() {cr.Column.ToString(), cr.Row.ToString(), cr.ColumnCount.ToString(), cr.RowCount.ToString()}) End Sub