VB 使用 NCalc 坐标计算

Question

我需要它从 -n 循环到 n，但到目前为止它只产生一个坐标。有谁知道任何简单的快速修复方法，以便我可以将 -n 到 n 的值（步骤 1）代入 y 方程 ID 输入？

我也不确定我是否正确使用了表达式部分，因为我今天之前从未尝试过 NCalc。

Dim y As String
Dim n As Integer

n = txtX.Text
y = txtY.Text
For x As Integer = -n To n Step 1

    Dim exp As Expression = New Expression(y)
    exp.Parameters("n") = n
    Label1.Text = exp.Evaluate

    Chart1.Series("plot1").Points.AddXY(x, y)
Next

Answer 1

我查看了 NCalc 并设法得出以下结果。

在一个空表单上，我放置了两个文本框，“tbEquation”用于保存方程式，“tbXextents”用于保存用于计算函数的最大 x 值；和一个按钮“bnDrawGraph”告诉它绘制图形。

Private Sub bnDrawGraph_Click(sender As Object, e As EventArgs) Handles bnDrawGraph.Click

    Chart1.Legends.Clear()
    Chart1.Series.Clear()
    Dim xy As New Series
    xy.ChartType = SeriesChartType.Line

    Dim expr = New NCalc.Expression(tbEquation.Text)
    Dim xMax = Integer.Parse(tbXextents.Text)

    For x = -xMax To xMax
        expr.Parameters("n") = x
        Dim y = Convert.ToDouble(expr.Evaluate())
        xy.Points.AddXY(x, y)
    Next

    Chart1.Series.Add(xy)

End Sub

您只需创建一次表达式，然后再在循环中使用它。
似乎 Evaluate() 方法 returns 是一个 Object 而不是任何特定类型的变量，所以我使用 Convert.ToDouble 来获取数值类型的值适合在图表系列中使用。

示例输出：

VB 使用 NCalc 坐标计算

VB co-ordinate calculation with NCalc

vb.net

math

loops

ncalc