VBScript. Функция CCur
Материал из GedeminWiki
Конвертирует переданное значение в вариант с подтипом Currency.
CCur(expression)
Если expression является строковым выражением, то конвертация в число осуществляется согласно региональным настройкам операционной системы.
Пример:
Dim MyDouble, MyCurr MyDouble = 123.67894532 MyCurr = CCurr(MyDouble) ' MyCurr = 123.6790
