9

我想用VB从一个字符串计算一个算术表达式,有什么想法吗?

例如:文本框中的“x+2”,我想评估表达式

4

3 回答 3

16
Dim equation As String = "2+6/2"
Dim result = New DataTable().Compute(equation, Nothing)
于 2017-01-19T15:41:28.970 回答
12

你可以用NCalc这个。它还接受x、y、z、...等参数

Dim e As Expression = new Expression("2 + 3 * 5")
Msgbox(17 = e.Evaluate())
于 2012-11-01T14:05:37.713 回答
2

您可以为此目的使用 mxparser 库。通过单击 Microsoft Visual Studio 的添加引用按钮,在您的项目中引用 mxparser.dll。mxparser 库源代码或最新的 dll 文件可以来自 www.mathparser.org。mXparser 是适用于 Java、Android、C# .NET (CLS) 库的数学解析器。

Imports org.mariuszgromada.math.mxparser
Private Function evaluate(ByVal str As String) AS Double
Dim expr As Expression = New Expression(str)
DIM d1 As Double
d1=0
d1=expr.calculate()
return d1
End Function

调用函数可以如下。

DIM str as String
str=""
str=((45^5)/45))*(5*6)

Dim d as Double
d=0
d=evaluate(str)
MsgBox(" The result of the expression is   " + d.ToString)
于 2016-12-26T04:57:12.430 回答