Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: hellrider
Доброго дня. В ходе выполнения кода у меня перебираются величины из рекордсета и сравниваются их значения, формат данных - двойное с плавающей точкой, два знака после запятой. Код на сравнение простейший

If rs.Fields("fldZ").Value > rs.Fields("fldZmax").Value Then....

Я заметил, что когда величины равные между собой, то условие также срабатывает. Причем проблема не в округлении, я проверил - поставил после выполнения условия msgbox на первое и второе значение, они действительно равные. А условие выполняется! Что за чудеса - не пойму. Я пробовал по другому писать условие, вот так

If (rs.Fields("fldZ").Value - rs.Fields("fldZmax").Value) > 0 Then....

все равно - при равности величин срабатывает также. Пробовал объявлять переменные, загонять в них значение из рекордсета и в условии сравнивать переменные - то же самое. Не встречался ли кто с подобным и как его победить?


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.