Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Пример la...

Тема: Пример la_form1: сумма прописью

15.06.2007 21:08:24

All

4316 сообщения

Тема: Пример la_form1: сумма прописью

Что нужно изменить в коде, чтобы на экране выводить сумму прописью в следующем виде, например я введу в поле формы сумму 15275,22 и на экране должно отображаться "15275 (Пятнадцать тысяч двести семьдесят пять) рублей 22 копейки".

Буду очень признателен!!!
С уважением, Игорь!!!

P.S. Общий раздел по формам
Автор: Игорь от 0:00:00 Источник ...

15.06.2007 21:08:24

All

4316 сообщения

RE: Пример la_form1: сумма прописью

1. Me.ПрописьТекст = c & " (" & funRusMoney(c, False) & ")"
2. Скачать снова данный пример (добавлен 3 вариант суммы прописью)

P.S. Общий раздел по формам
Автор: Admin от 0:00:00 Источник ...

15.06.2007 21:08:24

All

4316 сообщения

RE: Пример la_form1: сумма прописью

Огромное спасибо!!!

Но все таки мне нужно отображение, как я описывал в моем вопросе. Рублевая часть отдельно, копейки отдельно. В таком виде оформляются многие платежные документы. А мне очень нужно.

С уважением, Игорь!!!

P.S. Общий раздел по формам
Автор: Игорь от 0:00:00 Источник ...

15.06.2007 21:08:24

All

4316 сообщения

RE: Пример la_form1: сумма прописью

1. Существует масса способов как разделить число на целую и дробную часть. Например,
buf = Split(Format(Me.сумма, "0.00"), ",")
В buf(0) будут храниться рубли, а buf(1) - копейки.
2. Есть еще функции Fix, Int и другие для обработки строк, лучше их работу изучить самостоятельно.

P.S. Общий раздел по формам
Автор: Admin от 0:00:00 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Пример la...

Поиск

Список форумов

Начало | Forums