NCalc在vb.net中創建自定義函數

Question

在vb2010而不是c＃中創建自定義函數的等效代碼是什麼？

Expression e = new Expression("SecretOperation(3, 6)"); 
    e.EvaluateFunction += delegate(string name, FunctionArgs args) 
     { 
      if (name == "SecretOperation") 
       args.Result = (int)args.Parameters[0].Evaluate() + (int)args.Parameters[1].Evaluate(); 
     }; 

Answer 1

下面介紹如何做到這一點！

Imports NCalc 

Public Class Form1 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    Dim exp As New Expression("SecretOperation(3, 6)") 
     AddHandler exp.EvaluateFunction, Sub(str, args) 
     If str = "SecretOperation" Then 
     args.Result = CInt(args.Parameters(0).Evaluate() + args.Parameters(1).Evaluate()) 
     End If 
    End Sub 
    End Sub 
End Class 

從技術文檔：http://msdn.microsoft.com/en-us/library/ms172879.aspx