Как в String записать значение Double без "E"? -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [18.216.230.107]

Правила раздела Visual Basic: Общие вопросы

Здесь обсуждаются вопросы по языку Visual Basic 1-6 (а так же по схожим языкам, как, например, PowerBASIC).
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.

Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.

Полезные ссылки:
user posted image

FAQ Сайта

FAQ Раздела user posted image

Кладовка

Наши Исходники user posted image

API-Guide

Поиск по Разделу user posted image

MSDN Library Online user posted image

Google

Ваше мнение о модераторах: user posted image

SCINER,

B.V.

Модераторы: SCINER, B.V.

Новое голосование

Как в String записать значение Double без "E"? , Visual Basic v.6.0

Сергей85	Сообщ. #1 , 20.01.17, 07:52
Profi Профиль · PM Рейтинг (т): 5	Понимаю, что просто написать функцию, которая LeftStr(E) умножит на 10^RightStr(E) - но так не интересно. Есть ли встроенный механизм, позволяющий преобразовать искореженные значения мизерных и великих чисел даблов в нормальные?

Mikle	Сообщ. #2 , 20.01.17, 08:32
Profi Профиль · PM Поощрения: 2 Dgm Рейтинг (т): 102	Цитата Сергей85 @ 20.01.17, 07:52 Есть ли встроенный механизм, позволяющий преобразовать искореженные значения мизерных и великих чисел даблов в нормальные? Format()

Akina	Сообщ. #3 , 20.01.17, 10:15
Monster Профиль · PM Поощрения: 35 Dgm Рейтинг (т): 541	Большие числа нормально выводятся с помощью Debug.Print Format(num,"#") А вот с малыми всё непросто - будет выводиться тупо ноль. Когда-то очень давно была такая надобность - пришлось рисовать собственную функцию.

Сергей85	Сообщ. #4 , 21.01.17, 08:52
Profi Профиль · PM Рейтинг (т): 5	Как ни странно, решением оказалась CDec().

Mikle	Сообщ. #5 , 21.01.17, 10:28
Profi Профиль · PM Поощрения: 2 Dgm Рейтинг (т): 102	Цитата Сергей85 @ 21.01.17, 08:52 Как ни странно, решением оказалась CDec(). И какое же это решение? Числа, в отличие от Format(), переполняются уже на E29.

Сергей85	Сообщ. #6 , 21.01.17, 10:31
Profi Профиль · PM Рейтинг (т): 5	Цитата Mikle @ 21.01.17, 10:28 Решение для чисел с <E29, стало быть. ) Добавлено 21.01.17, 10:32 Ну, можно объединить тогда. Если E >28, Debug.Print Format(num,"#"), если меньше - CDec.

Mikle	Сообщ. #7 , 21.01.17, 11:58
Profi Профиль · PM Поощрения: 2 Dgm Рейтинг (т): 102	Цитата Сергей85 @ 21.01.17, 10:31 Ну, можно объединить тогда. Если E >28, Debug.Print Format(num,"#"), если меньше - CDec. А если меньше E-29?

Сергей85	Сообщ. #8 , 21.01.17, 13:48
Profi Профиль · PM Рейтинг (т): 5	Цитата Mikle @ 21.01.17, 11:58 Слишком маловероятно. Вы о слишком больших крайностях говорите. )

Mikle

Сообщ. #9 , 21.01.17, 14:50

Profi

Профиль · PM

Поощрения: 2 Dgm

Рейтинг (т): 102

Цитата Сергей85 @ 21.01.17, 13:48

Вы о слишком больших крайностях говорите.

Так я же не знаю, зачем это, вот и смотрю задачу целиком.
А, скажем, E-14, это не очень крайность? Начиная с E-14 при использовании CDec начинают теряться значащие цифры.

Сергей85	Сообщ. #10 , 21.01.17, 15:23
Profi Профиль · PM Рейтинг (т): 5	Ну, вот это я уже не знал. Добавлено 21.01.17, 15:23 У меня до E-12 проверялось.

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0571 ] [ 16 queries used ] [ Generated: 3.05.24, 01:35 GMT ]