конвертировать один в 8 байтов invb.net

Question

У меня есть сингл, который может иметь десятичный знак, но не может.
Я должен поместить цифру перед десятичной дробью в первые 4 байта, а цифру - в следующие 4 байта.
Так что 1.1 будет 01-00-00-00-01-00-00-00
или 2,1 будет 02-00-00-00-01-00-00-00
или 1 будет 01-00-00-00-00-00-00-00

Цифра перед десятичной запятой сохраняется как целое число в байтах, совпадающее с цифрой после запятой.
Таким образом, 1.1 делится на 1 и 1, а затем сохраняется как 2 DWORDS: 01000000 и 01000000

Answer 1

Как это:

Dim b(7) As Byte
b(0) = Convert.ToByte(Math.Floor(n))
b(4) = Convert.ToByte((n - Math.Floor(n)) * 10)