Конвертирование числа double в hex string и обратно - Visual Basic .NET

Формулировка задачи:

Нашел отличный код

                    Листинг программы
                
' This uses .NET converters to convert from double to hex string and back
    Dim D As Double = 255.68
    Dim I64 As Int64 = BitConverter.DoubleToInt64Bits(D)
    Dim S As String = Hex(I64)
    I64 = Int64.Parse(S, Globalization.NumberStyles.HexNumber)
    D = BitConverter.Int64BitsToDouble(I64)

работает отлично, но мне нужен обратный порядок байтов. Очень не хочется их тупо переставлять в обратном порядке, возможно кто-то знает способ проще?

Решение задачи: «Конвертирование числа double в hex string и обратно»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim q As String = 255.68
        Dim B() As Byte = System.Text.Encoding.Default.GetBytes(q)
        Array.Reverse(B)
        Dim V As New System.Text.UTF8Encoding()
        Label1.Text = V.GetString(B)
    End Sub
End Class

Оцени полезность:

13 голосов , оценка 4.385 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы