Internationalization VB.Net

Imports System
Imports System.Text
Class UTF8EncodingExample
    Public Shared Sub Main()
        Dim chars() As Char
        Dim bytes() As Byte = {99, 204, 128, 234, 130, 160}
        Dim utf8Decoder As Decoder = Encoding.UTF8.GetDecoder()
        Dim charCount As Integer = utf8Decoder.GetCharCount(bytes, 0, bytes.Length)
        chars = New Char(charCount - 1) {}
        Dim charsDecodedCount As Integer = utf8Decoder.GetChars(bytes, 0, bytes.Length, chars, 0)
        Dim c As Char
        For Each c In  chars
            Console.Write("[{0}]", c)
        Next c
    End Sub 
End Class