BitConverter.GetBytes (Single) returns single-precision floating point value as an array of bytes.
Imports System Imports Microsoft.VisualBasic Module GetBytesSingleDemo Sub GetBytesSingle( argument As Single ) Dim byteArray As Byte( ) = BitConverter.GetBytes( argument ) Console.WriteLine( BitConverter.ToString( byteArray ) ) End Sub Sub Main( ) GetBytesSingle( 1.0F ) End Sub End Module