Convert values to Byte arrays and display them
Module BitConverterDemo Sub Main( ) Dim aDoubl As Double = 0.11111111111 Dim aSingl As Single = 0.11111111111 Dim aLong As Long = 1111111111111 Dim anInt As Integer = 11111 Dim aShort As Short = 11111 Dim aChar As Char = "*"c Dim aBool As Boolean = True Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aDoubl ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aSingl ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aLong ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( anInt ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aShort ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aChar ) ) ) Console.WriteLine( BitConverter.ToString( BitConverter.GetBytes( aBool ) ) ) End Sub End Module