Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как получить дробную часть ? / 7 сообщений из 7, страница 1 из 1
10.09.2008, 10:38
    #35531334
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
Доброе время суток, скур и слебядей!

Есть ли функция, которая позволит выделить дробную часть?
Накропал это только Val(Replace(z1, ",", ".")) - Fix(Val(z1)) - а она
для 23,22 шокирует меня результатом
0,21999999997206
.
...
Рейтинг: 0 / 0
10.09.2008, 10:44
    #35531347
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
> Автор: SuperJur
> Доброе время суток, скур и слебядей!

И тебя, тем-же концом, по тому-же месту (с)

>
> Есть ли функция, которая позволит выделить дробную часть?
> Накропал это только Val(Replace(z1, ",", ".")) - Fix(Val(z1)) - а она

? 23.25 - (23.25 mod 100)

> для 23,22 шокирует меня результатом
> 0,21999999997206

что-бы не было шока, почитай о представлении дробных чисел в компьютере

--
С уважением Горбонос Игорь Леонидович

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
10.09.2008, 11:10
    #35531418
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
? 23.25 - (23.25 mod 100)

интересное решение, а что мне делать, если число будет 2345?
Усложню задачу: входящий параметр может принимать значения от [0, 999 999 999 999]
...
Рейтинг: 0 / 0
10.09.2008, 12:03
    #35531566
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
вот так мне кажется прокатит:
223.25 * 1000 Mod 1000
...
Рейтинг: 0 / 0
10.09.2008, 13:17
    #35531776
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
А чем не нравится z1-int(z1) ?
...
Рейтинг: 0 / 0
10.09.2008, 15:17
    #35532140
SuperJur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить дробную часть ?
да нравится, конечно! просто я думал, может уже есть какая нить встроенная.

Спасибо!
...
Рейтинг: 0 / 0
10.09.2008, 15:40
    #35532227
Как получить дробную часть ?
Пытаюсь из Delphi добавить в вордовский документ в поле длинный текст

Код: plaintext
WordApp.ActiveDocument.FormFields.Item(AFieldName).Result = Text


приведенный пример вставляет только 256 символов, если больше то выдает ошибку - "слишком длинная строка"

Есть идея, добавлять в поле по 256 символов. Как именно _добавлять_ , а не вставлять ?
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как получить дробную часть ? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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