LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Точность...
 RE: Точность
 
 15.06.2007 21:04:08
VVV
26 сообщения


RE: Точность
Надо изначально уточнять с чем работаете.
Сам, честно говоря, с 97 никогда не работал, но судя по имеющейся у меня информации там действительно такой функции нет. И в Нете очень много примеров, посвященных самодельным функциям округления. Одну из таких привожу (взято из "каталога" Григория Матющенко)

Function dhRound(dblNumber As Double, intDecimals _
As Integer) As Double
' округляет число до заданного количества десятичных знаков
' 0,5 округляется в сторону увеличения

Dim dblFactor As Double
Dim dblTemp As Double

dblFactor = 10 ^ intDecimals
dblTemp = dblNumber * dblFactor + 0.5
dhRound = Int(dblTemp) / dblFactor

End Function

А вообще рекомендую поискать его сайт и скачать эту программку 0_Katalog.mdb. Там куча дельных примеров. Она, по моему имеется и на других ресурсах. Я бы подкинул адресок, да уже не помню сам откуда скачал.
Полазьте по ссылкам в разделе "ресурсы" здесь на "Лидерсофте".


P.S. Общий раздел по запросам
Автор: VVV от 04.06.2003 2:05:17 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Точность...
ПоискПоиск  Список форумовСписок форумов  
right