Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Label и десятичная дробь / 11 сообщений из 11, страница 1 из 1
09.10.2007, 14:36:06
    #34856983
Darvins
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Подскажите пожалуйста,
как в Label, при числовом выражении, назначать кол-во знаков после запятой?

Спасибо!
...
Рейтинг: 0 / 0
09.10.2007, 15:07:41
    #34857140
udgeen69
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Код: plaintext
Label.caption = Round(Num, Number_after_decimal)
...
Рейтинг: 0 / 0
09.10.2007, 15:17:16
    #34857195
Darvins
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
udgeen69
спасибо,
еще такой вопрос, а как сделать отображение разрядности?
...
Рейтинг: 0 / 0
09.10.2007, 16:10:13
    #34857447
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Код: plaintext
Label.caption = Format(Round(Num, Number_after_decimal),"# ##0.00")
...
Рейтинг: 0 / 0
09.11.2007, 11:25:13
    #34927428
Darvins
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
еще один вопрос
имеется форма (прилагается), в которой при вводе чисел в Текстбокы, в Лабел1 и 3 происходит расчет с отображением десятичной дроби, одновременно считается сумма в Лабел2
Вопрос:
почему в Лабел2 считаются только целые числа из Лабел1 и 3?
как сделать чтобы в суммировании в Лабел2 участвовали и десятичные числа?
...
Рейтинг: 0 / 0
09.11.2007, 11:37:17
    #34927500
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
1) Если используете Format , то не используйте Round , он не нужен, тем более тут в соседнем топике выяснилось, что у этой функции есть баг.
2) У вас все вычисления с ошибками, т.к. нужно вместо Val использовать CDbl

В итоге получается

Label2.Caption = Format(CDbl(Label1.Caption) + CDbl(Label3.Caption), "# ##0.00")
Это для примера, а так нужно изменить все формулы!
...
Рейтинг: 0 / 0
09.11.2007, 12:16:14
    #34927679
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Функция Val воспринимает только точку.
...
Рейтинг: 0 / 0
09.11.2007, 13:19:11
    #34927977
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Единственное наверное нужно проверять является ли значение числом
Код: plaintext
CDbl(IIf(IsNumeric(TextBox4.Text), TextBox4.Text,  0 ))
...
Рейтинг: 0 / 0
09.11.2007, 16:24:16
    #34928890
Darvins
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Спасибо
не думал что все так сложно )
а что означает CDbl? в книге я такого не нашол.
...
Рейтинг: 0 / 0
09.11.2007, 16:32:19
    #34928917
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
DarvinsСпасибо
не думал что все так сложно )
а что означает CDbl? в книге я такого не нашол.

Функция CDbl( C onversion to D o bl e) преобразует выражение в тип данных двойной точности Double
...
Рейтинг: 0 / 0
09.11.2007, 16:34:14
    #34928926
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Label и десятичная дробь
Хотя возможно Функцию CDbl и не нужно использовать, достаточно проверки является ли числом.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Label и десятичная дробь / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]