数组填充无法正常工作

Question

I am trying to fill an array of length 300 with the same value using VB here is my code:

Dim counter As Integer
If (value = True) Then
    For counter = LBound(arrLowThresholds) To UBound(arrLowThresholds) Step 1
        arrLowThresholds(counter) = LOG_TEST_LOW_THRESHOLD
        arrHighThresholds(counter) = LOG_TEST_HIGH_THRESHOLD
    Next
End If

The problem with this is that only the first element of the arrays is being filled. Note that some of the variables are declared elsewhere that is the reason that the declaration is not visible.

arrLowThresholds and arrHighThresholds are the arrays while LOG_TEST_LOW_THRESHOLD and LOG_TEST_HIGH_THRESHOLD are the variables

Answer 1

I solved the problem by making a local array to use with the for loop. Then I copied the contents to the array I am actually using.