Example: Cnv.ByteEncoding  Cnv.EncodingConversion 

[VB6 equivalent: CNV_ByteEncoding]

Dim abLatin1() As Byte
Dim abUtf8() As Byte
' Set up a byte array with the following 4 characters encoded in Latin-1
'  U+0061 LATIN SMALL LETTER A
'  U+00E9 LATIN SMALL LETTER E WITH ACUTE
'  U+00F1 LATIN SMALL LETTER N WITH TILDE
'  U+0062 LATIN SMALL LETTER B
abLatin1 = New Byte() {Asc("a"), &HE9, &HF1, Asc("b")}
' Display in hex format
Console.WriteLine("Latin-1=" & Cnv.ToHex(abLatin1) & " (" & abLatin1.Length & " bytes)")
' Convert encoding to UTF-8
abUtf8 = Cnv.ByteEncoding(abLatin1, Cnv.EncodingConversion.Utf8_From_Latin1)
' Display in hex format
Console.WriteLine("UTF-8  =" & Cnv.ToHex(abUtf8) & " (" & abUtf8.Length & " bytes)")

See Also:
Cnv.ByteEncoding Method

[Contents] [Index]