Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) 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-2022 Chilkat Software, Inc. All Rights Reserved.