Счетчик SpinButton

[7vlad37]

Добрый день уважаемые ЗНАТОКИ !!

Попал в тупик.Есть код , но при работе счетчика SpinButton3
в сторону увеличения 1;2;3;4;…..и т.д., данные уменьшаются
а должно быть наоборот ,не пойму где ошибка.
Помогите пожалуйста.
Private Sub SpinButton3_Change()
If allCubes Is Nothing Then SetAllCubes
allCubes.Adjustments(1) = SpinButton3 / 35
End Sub
Заранее благодарен.

[nilem]

Попробуйте

Private Sub SpinButton3_Change()
If allCubes Is Nothing Then SetAllCubes
allCubes.Adjustments(1) = 1 - SpinButton3 / 20
End Sub

[7vlad37]

Уважаемый nilem!
Все получилось,огромное вам спасибо.