MESCIUS SPREAD for Windows Forms 15.0J
LastConditionExpression プロパティ
使用例 

最後の条件を式として取得または設定します。
構文
'宣言
 
Public Property LastConditionExpression As Expression
public Expression LastConditionExpression {get; set;}

プロパティ値

最後の条件の Expression
解説
式の詳細については、FarPoint.CalcEngineおよび「関数リファレンス」を参照してください。
使用例
次のサンプルコードは、書式の式を返します。
FarPoint.Win.Spread.NamedStyle above = new FarPoint.Win.Spread.NamedStyle();
FarPoint.Win.Spread.NamedStyle below = new FarPoint.Win.Spread.NamedStyle();
above.BackColor = Color.Red;
below.BackColor = Color.Yellow;

FarPoint.CalcEngine.Expression one;
FarPoint.CalcEngine.Expression two;
FarPoint.CalcEngine.Expression oneplustwo;
one = new FarPoint.CalcEngine.DoubleExpression(100.0);
two = new FarPoint.CalcEngine.DoubleExpression(20.0);
oneplustwo = new FarPoint.CalcEngine.BinaryOperatorExpression(FarPoint.CalcEngine.BinaryOperatorInfo.AddOperator, one, two);
fpSpread1.ActiveSheet.SetExpression(1, 1, oneplustwo);

fpSpread1.ActiveSheet.SetConditionalFormat(1, 1, above, FarPoint.Win.Spread.ComparisonOperator.GreaterThan, one, two);
fpSpread1.ActiveSheet.SetConditionalFormat(1, 1, below, FarPoint.Win.Spread.ComparisonOperator.LessThan, one, two);

FarPoint.Win.Spread.ConditionalFormat[]cf;
cf = fpSpread1.ActiveSheet.GetConditionalFormats(1, 1); 
foreach (FarPoint.Win.Spread.ConditionalFormat item in cf) 
{ 
      MessageBox.Show(item.LastConditionExpression.ToString()); 
}
Dim above As New FarPoint.Win.Spread.NamedStyle
Dim below As New FarPoint.Win.Spread.NamedStyle
above.BackColor = Color.Red
below.BackColor = Color.Yellow

Dim one As FarPoint.CalcEngine.Expression
Dim two As FarPoint.CalcEngine.Expression
Dim oneplustwo As FarPoint.CalcEngine.Expression
one = New FarPoint.CalcEngine.DoubleExpression(100.0)
two = New FarPoint.CalcEngine.DoubleExpression(20.0)
oneplustwo = New FarPoint.CalcEngine.BinaryOperatorExpression(FarPoint.CalcEngine.BinaryOperatorInfo.AddOperator, one, two)
fpSpread1.ActiveSheet.SetExpression(1, 1, oneplustwo)

Dim co As New FarPoint.Win.Spread.ComparisonOperator
fpSpread1.ActiveSheet.SetConditionalFormat(1, 1, above, co.GreaterThan, one, two)
fpSpread1.ActiveSheet.SetConditionalFormat(1, 1, below, co.LessThan, one, two)


Dim cf As FarPoint.Win.Spread.ConditionalFormat()
Dim item As New FarPoint.Win.Spread.ConditionalFormat
cf = fpSpread1.ActiveSheet.GetConditionalFormats(1, 1)
For Each item In cf
      MessageBox.Show(item.LastConditionExpression.ToString())
Next
参照

ConditionalFormat クラス
ConditionalFormat メンバ

 

 


© MESCIUS inc. All rights reserved.