Страница: 1 |
Страница: 1 |
Вопрос: Оставить два знака после запятой у Decimal
Добавлено: 05.04.08 16:21
Автор вопроса: Arti
Собственно как без округлетия т.е. 1234,56789 представить в виде 1234,56 а не 1234,60?
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
Arti
Вопросов: 2
Ответов: 5
Профиль | | #1
Добавлено: 05.04.08 17:12
Пока что делаю так
Dim decnkczl As Decimal
decnkczl = 1234,56789
TextBox1.Text=Strings.Left(CStr(decnkczl), InStr(CStr(decnkczl), "," + 2)
Как-то ещё можно?
Номер ответа: 2
Автор ответа:
VoVaN
ICQ: 4921085
Вопросов: 27
Ответов: 38
Профиль | | #2
Добавлено: 05.04.08 22:27
Номер ответа: 3
Автор ответа:
VoVaN
ICQ: 4921085
Вопросов: 27
Ответов: 38
Профиль | | #3
Добавлено: 05.04.08 22:28
а, блин, без округления тогда по-другому не получится
Номер ответа: 4
Автор ответа:
Skywalker
ICQ: 300-70-6пятьЪ
Вопросов: 62
Ответов: 545
Web-сайт:
Профиль | | #4
Добавлено: 06.04.08 00:54
Dim a As Single = 1234.56789
a = Int(a * 100) / 100
MsgBox(a.ToString)
Номер ответа: 5
Автор ответа:
astoro
ICQ: 649109
Вопросов: 31
Ответов: 391
Профиль | | #5
Добавлено: 08.04.08 07:28
в вб6 была еще такая комана format
тоже могла помочь