Здравствуйте Лёлик, Вы писали:

Лё> Просто число читается из бинарного файла в котором байты находятся в обратном порядке

Попробуй так.

Dim a As Double
Dim b As String
a = 101110010
b = CStr(a)
b = StrReverse(b)
a = CDbl(b)