vb.net For If语句中的循环-缩短ElseIf

如何缩短此时间： 信息：%WASHV%是来自外部循环的常量，因此%loop%也是

我尝试在Elseif/中使用newif语句执行for循环，但失败了

谢谢

代码：

|If [%loop%] = "1" Then
Return "True"

ElseIf [%loop%] =96-(96-round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-2*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-3*round([5000/%WASHV%])) Then
Return "True"
ElseIf [%loop%] =96-(96-4*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-5*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-6*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-7*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-8*round([5000/%WASHV%])) Then
Return "True"

ElseIf [%loop%] =96-(96-9*round([5000/%WASHV%])) Then
Return "True"

Else

Return "False“

End If|

---

撇开奇怪的变量不谈，它看起来像一个非常简单的循环。Return语句将自动退出循环，一旦到达您所在的函数，循环将停止。如果循环完成，则达到Else条件

If [%loop%] = "1" Then
    Return "True"
End If

For i As Integer = 1 To 9

    If [%loop%] =96-(96-i*round([5000/%WASHV%])) Then
        Return "True"
    End If

Next

Return "False"

---

如果是VB.Net，则简化过程如下：

For i As Integer = 1 To 9
    If [%loop%] =96-(96-i*round([5000/%WASHV%])) Then
        Return "True"
    End If
Next

Return If([%loop%] = "1", "True", "False")

... where s like '%loop%'

然而，更紧迫的问题是找出%loop%和%WASHV%的用法

初始化期间在VB.Net变量右侧使用%表示它是一个整数：

Dim a% 'integer

选中此项：

还有许多其他符号，如$，&，！，@，还有

但左派，我不知道

在我看来，它更像是查询语言，类似这样：

For i As Integer = 1 To 9
    If [%loop%] =96-(96-i*round([5000/%WASHV%])) Then
        Return "True"
    End If
Next

Return If([%loop%] = "1", "True", "False")

... where s like '%loop%'

---

你确定那是VB.NET吗？我在VB.NET中从未见过像

%loop%

这样的变量……是在另一个程序中的VB使用了这些%%defining tokens什么程序？如果不知道代币是如何工作的，我们可能无法提供帮助。它当然不是使用visual studio编写的。它是针对自动采样器软件，假设%loop%从1到96运行，并且%washv%是一个常量值，但用户可以提前更改，因此此帮助无效？因此[%loop%]是循环索引？计算不应该是96-（96-i*轮（[5000/%washv%]）还是我遗漏了什么？干杯，当然应该。我已经修改过了。谢谢