Create a UnicodeEncoding to support big-endian byte ordering and include the Unicode byte order mark
Imports System Imports System.Text Class UnicodeEncodingExample Public Shared Sub Main() Dim unicodeBigEndianBOM As New UnicodeEncoding(True, True) End Sub End Class