Dim n As Single
n = 98
n = n / 100
Вопрос по Переменным
Столкнулся с проблемой объявления переменных. В программе необходимо делить заданные числа на 100, для последующего нахождения процента от числа. Естественно делимые числа колеблются от 1 до 100, соотвественно результат деления от 0 до 1. Но, программа будет верно осуществлять действие, если переменная, отвечающая за частное, будет поддерживать десятичные числа. Иначе, большинство значений она округлит до 0, исключая лишь случай деления 100\100.
Все работает верно, но прога продолжает округлять значения. При вводе 100, получается "1". То есть, ошибок быть не может. Проблема в объявлении переменной.
Пробовал по-разному...
Dim "частное" As Single
Dim "частное" As Double
Dim "частное" As Decimal, а это вообще оболочка не распознает, выдавая ошибку "Expected: New or Type Name" Версия оболочки VB6.
Кто может посоветовать?
Все работает верно, но прога продолжает округлять значения. При вводе 100, получается "1". То есть, ошибок быть не может. Проблема в объявлении переменной.
Пробовал по-разному...
Dim "частное" As Single
Dim "частное" As Double
Dim "частное" As Decimal, а это вообще оболочка не распознает, выдавая ошибку "Expected: New or Type Name" Версия оболочки VB6.
Кто может посоветовать?
Код:
витоге в n находиться значение 0,98 Непонимаю в чем у тебя проблема.
Цитата:
исключая лишь случай деления 100\100.
это что? оператор \ используешь?
это оператор целочисленого деления, всегда возвращает целое.
используй /.
HookEst прав.
Используй 'Double' - числа двойной точности. "\" - деление нацело. "/" - простое деление. Будь внимателен.
Используй 'Double' - числа двойной точности. "\" - деление нацело. "/" - простое деление. Будь внимателен.
Большое спасибо выручили )) вновь...