Question

我有一个数组，其中包含各种数字，我想要做的是找到任何大于200的数字，并在每次找到数字时计数。我认为For Each循环是合适的，但在实现上有点遗失。

 Dim intCount As Integer

    For Each Index In _intCholesterolLevel
        If Index > 200 Then

            intCount += 1
        End If
    Next

Answer 1

您的代码是正确的，但有一些令人困惑的部分，如评论中所述。＆＃34; For Each＆＃34; loop返回数组中每个元素的值，而不是数组索引。单词＆＃34; index＆＃34;指的是数组的位置，因此它不是一个好的变量名。你还应该将intCount初始化为0.

所以，你的代码再次运行，但是这里有一个更清晰的例子，它产生一个正确的intCount值为3

Dim intCount As Integer = 0
Dim _intCholesterolLevel() As Integer = {50, 100, 150, 200, 250, 300, 350}

For Each cholesterolValue In _intCholesterolLevel
    If cholesterolValue > 200 Then

        intCount += 1
    End If
Next

从大于特定数字的数组中查找并计算整数？

1 个答案: