Использование функции VAL со строками из пользовательской формы - PullRequest
0 голосов
/ 20 мая 2019

У меня есть модуль, который находит самые низкие и самые высокие значения для расчета диапазона измерений.

У меня нет вариантов, чтобы попробовать. Он работал нормально в течение 3 месяцев и просто остановился с ошибкой при компиляции. Вал выделен синим цветом.

'Нахождение значений Min и Max обрезанной ленты.

Dim tMin As Integer
Dim tMax As Integer

tVar = 0
tMin = 10
tMax = -10

For j = 1 To 5
    If tMin > Val(Controls("Tape" & j)).Value Then
        tMin = Val(Controls("Tape" & j)).Value
    End If

    If tMax < Val(Controls("Tape" & j)).Value Then
        tMax = Val(Controls("Tape" & j)).Value
    End If

    Debug.Print tMin, tMax

Next j

tVar = tMax - tMin

ожидаемый результат - разница между значениями Max и Min. Фактические результаты - синтаксическая ошибка с выделенным Val.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...