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.