BitConverter.GetBytes (Int16) returns 16-bit signed integer value as an array of bytes.
Imports System Imports Microsoft.VisualBasic
Module GetBytesInt16Demo Sub GetBytesInt16( argument As Short ) Dim byteArray As Byte( ) = BitConverter.GetBytes( argument )
Console.WriteLine( BitConverter.ToString( byteArray ) ) End Sub
Sub Main( )
GetBytesInt16( 15 ) End Sub End Module