PowerTools SPREAD for Windows Forms 8.0J
EvaluateExpression メソッド (IExpressionSupport2)


基本セルの行インデックス
基本セルの列インデックス
評価する式
式を評価し、指定した行および列のセルに対する結果のオブジェクトを返します。
構文
'Declaration
 
Function EvaluateExpression( _
   ByVal row As Integer, _
   ByVal column As Integer, _
   ByVal expression As Expression _
) As Object
'使用法
 
Dim instance As IExpressionSupport2
Dim row As Integer
Dim column As Integer
Dim expression As Expression
Dim value As Object
 
value = instance.EvaluateExpression(row, column, expression)
object EvaluateExpression( 
   int row,
   int column,
   Expression expression
)

パラメータ

row
基本セルの行インデックス
column
基本セルの列インデックス
expression
評価する式

戻り値の型

評価された式を含む Object
次のサンプルコードは、式を評価し、指定した行および列のセルに対する結果のオブジェクトを返します。
FarPoint.Win.Spread.Model.IExpressionSupport ems; 
FarPoint.CalcEngine.Expression one = new FarPoint.CalcEngine.DoubleExpression(1.0); 
FarPoint.CalcEngine.Expression two = new FarPoint.CalcEngine.DoubleExpression(2.0); 
FarPoint.CalcEngine.Expression oneplustwo = new FarPoint.CalcEngine.BinaryOperatorExpression(FarPoint.CalcEngine.BinaryOperatorInfo.AddOperator, one, two); 
ems = (FarPoint.Win.Spread.Model.IExpressionSupport)fpSpread1.ActiveSheet.Models.Data; 
ems.SetExpression(0, 0, oneplustwo); 
FarPoint.CalcEngine.Expression exp;
exp = ems.GetExpression(0, 0);
FarPoint.Win.Spread.Model.IExpressionSupport2 es;
es = (FarPoint.Win.Spread.Model.IExpressionSupport2)fpSpread1.ActiveSheet.Models.Data;
MessageBox.Show("The evaluated expression is " + es.EvaluateExpression(0, 0, exp).ToString());
Dim ems As FarPoint.Win.Spread.Model.IExpressionSupport
Dim one As FarPoint.CalcEngine.Expression
Dim two As FarPoint.CalcEngine.Expression
Dim oneplustwo As FarPoint.CalcEngine.Expression
one = New FarPoint.CalcEngine.DoubleExpression(1.0)
two = New FarPoint.CalcEngine.DoubleExpression(2.0)
oneplustwo = New FarPoint.CalcEngine.BinaryOperatorExpression(FarPoint.CalcEngine.BinaryOperatorInfo.AddOperator, one, two)
ems = FpSpread1.ActiveSheet.Models.Data
ems.SetExpression(0, 0, oneplustwo)
Dim exp As FarPoint.CalcEngine.Expression
exp = ems.GetExpression(0, 0)
Dim es As FarPoint.Win.Spread.Model.IExpressionSupport2
es = FpSpread1.ActiveSheet.Models.Data
MessageBox.Show("The evaluated expression is " & es.EvaluateExpression(0, 0, exp).ToString())
参照

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

 

 


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