Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VB.NET) Append Big-Endian or Little-Endian IntegersDemonstrates how to append integers in big-endian or little-endian byte order to a BinData. Note: This example requires Chilkat v9.5.0.77 or greater.
Dim bd As New Chilkat.BinData ' The hex value of decimal 123456789 is 0x075BCD15 Dim x As Integer = 123456789 ' Appending little-endian causes bytes to be ' appended in the order 0x15, 0xCD, 0x5B, 0x07 Dim littleEndian As Boolean = True Dim success As Boolean = bd.AppendInt4(x,littleEndian) Debug.WriteLine(bd.GetEncoded("hex")) ' Output is: 15CD5B07 ' Now append the same integer in big-endian byte order. ' Appending bit-endian causes bytes to be ' appended in the order 0x07, 0x5B, 0xCD, 0x15 littleEndian = False bd.AppendInt4(x,littleEndian) Debug.WriteLine(bd.GetEncoded("hex")) ' bd now contains: 15CD5B07075BCD15 ' ------------------------------------------- ' Now do the same thing with 16-bit integers bd.Clear() ' 1234 decimal = 0x04D2 hex. x = 1234 littleEndian = True bd.AppendInt2(x,littleEndian) Debug.WriteLine(bd.GetEncoded("hex")) ' Output is: D204 littleEndian = False bd.AppendInt2(x,littleEndian) Debug.WriteLine(bd.GetEncoded("hex")) ' Output is now: D20404D2 |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.