Новая функция, которая появилась в Visual Basic 6.0 Служит для форматирования числовых выражений, представляющих денежные суммы. Эта функция была введена в качестве альтернативы громоздкой функции Format. Используйте функцию FormatCurrency в силу ее большей читабельности
Возвращаемое значение
Возвращает строковое выражение, отформатированное в виде денежного значения с применением символа валюты, заданного в системной панели управления
Параметры
Часть
Описание
Expression
Обязательный. Форматируемое выражение
NumDigitsAfterDecimal
Необязательный. Числовое значение, задающее число знаков, отображаемых в правой части десятичной дроби. Значением по умолчанию, указывающим, что применяются национальные установки компьютера, является –1
IncludeLeadingDigit
Необязательный. Константа с тремя значениями, которая задает наличие или отсутствие начального нуля при отображении дробных значений. См. значения в разделе «Установки»
UseParensForNegativeNumbers
Необязательный. Константа с тремя значениями, которая указывает, надо ли заключать в круглые скобки отрицательные значения. См. значения в разделе «Установки»
GroupDigits
Необязательный. Константа с тремя значениями, указывающая на необходимость группирования цифр с применением разделителя групп, заданного в национальных установках компьютера. См. значения в разделе «Установки»
Установки
Параметры IncludeLeadingDigit, UseParensForNegativeNumbers и GroupDigits имеют следующие установки:
Константа
Значение
Описание
TristateTrue
–1
True
TristateFalse
0
False
TristateUseDefault
–2
Применяется установка, соответствующая национальным установкам для компьютера
Примечания
При пропуске одного или нескольких необязательных параметров значения для них присваиваются в соответствии с национальными установками компьютера
Расположение символа валюты по отношению к денежному значению определяется национальными установками для системы
Замечание Все сведения об установках содержатся на закладке Regional Settings Currency, за исключением вводного нуля, информация о котором находится на закладке Number
Пример
' В данном примере функция FormatCurrency
' используется для форматирования числа 100
Print FormatCurrency(100) 'возвращает 100.00р.