Количество цифр в числах Double

[haster]

Мне нужно сохранять числа типа Double в файл. Но при сохранении первоначальное число автоматически сокращается, например, первоначальное число- Dim c1 As Double = 123123.65456465152, а в файл сохраняется 123123654564.65152, 2 цифры потеряны или того хуже, первоначальное число -0.0000000673972095910358, а сохраняется как -6,73972095910358E-08, E-08, что вообще для моей задачи недопустимо. Как же сохранять числа точно такими же, как они и были? Или для иррациональных чисел хотя бы задавать конкретное количество символов после запятой.

И еще хочу узнать насчет ввода значений чисел double в исходный текст программы - можно ли как-нибудь регулировать количество возможных для ввода цифр числа, а то если я ввожу число 12245654321.1324654651324655465, то оно автоматически укорачивается до 12245654321.132465

[Admiralisimys]

haster использовать метод ToString() с параметром "R", так числовое представление Double будет полностью сохранено http://msdn.microsoft.com/en-us/library/dwhawy9k.aspx

Код: Выделить всё

Imports System

Class Program
    <STAThread()> Public Shared Sub Main()
        Dim c1 As Double = 123123.65456465152
        'Console.WriteLine(c1.ToString("R"))

        Dim fs As New IO.FileStream("123.txt", IO.FileMode.Create, IO.FileAccess.Write)
        Dim sw As New IO.StreamWriter(fs)
        sw.Write(c1.ToString("R"))
        sw.Close()
        fs.Close()
    End Sub
End Class

[haster]

Спасибо, почти помогло

При этом все равно появлялись числа с E-08, поэтому пришлось применить "F" вместо "R". Так сохраняются лишние цифры (например вместо 0 - 0.0000), может можно как-то и это обойти попроще?

[Admiralisimys]

haster в том же к описании к The Fixed-Point ("F") Format Specifier есть примеры как регулировать количество знаков после запятой.

[haster]

есть примеры как регулировать количество знаков после запятой

Это все понятно, только при The Fixed-Point ("F") Format Specifier нужно указывать конкретное количество знаков, а чтобы их указать нужно сначала отдельно выяснять сколько знаком в данном случае нужно (примеры с лишними нулями: 0.00115000, 0.000000 и т.д.). Пока в голову приходит только использовать регулярные выражения или TrimEnd, а потом еще проверять наличие точки. Наверно как-то так и сделаю, хоть это и не очень красиво.

[Qwertiy]

А зачем тебе это вообще надо? И об использовани Decimal ты не задумывался?

[haster]

об использовани Decimal ты не задумывался?

Действительно, если преобразовать CDec(c1) и сохранить, то все получается как надо.

Всем спасибо за помощь !

[Qwertiy]

Зачем тебе это вообще надо?