小编use*_*188的帖子

将vb6代码转换为vb.net?

我想把这个PID控制代码放到我的VB.net项目中,但对所有感叹号都有点无能为力.有人可以向我解释如何在VB.NET中实现这段代码吗?

Dim Er!, Derivative!, Proportional!

    Static Olderror!, Cont!, Integral!
    Static Limiter_Switch%
    Limiter_Switch% = 1

    Er = setpoint - process

    If ((Cont >= 1 And Er > 0) Or (Cont <= 0 And Er < 0) Or (Integ >= 9999)) Then
        Limiter_Switch = 0
    Else
        Limiter_Switch = 1
    End If
    Integral = Integral + Gain / Integ * Er * deltaT * Limiter_Switch

    Derivative = Gain * deriv * (Er - Olderror) / deltaT

    Proportional = Gain * Er

    Cont = …
Run Code Online (Sandbox Code Playgroud)

vb.net vb6

2
推荐指数
1
解决办法
1023
查看次数

标签 统计

vb.net ×1

vb6 ×1