неверный символьный результат после прочтения Zürich VB.net

Question

У меня возникла проблема с написанием строки, например слова "Zürich", результатом стало "Z�rich"

Я использую StreamReader и StreamWriter.

Любой может помочь мне с этим.

Код: ниже

Imports System
Imports System.IO
Imports System.Text
Module Module1

    Sub Main()
        Dim sReport As String       
        Dim strline As String
        Dim objSR As StreamReader
        Dim objSW As StreamWriter
        sReport = "C:\InvalidChar1.txt"
        Try

            objSW = New StreamWriter(sReport)

            objSR = New StreamReader("C:\InvalidChar.txt")

            Do
                strline = objSR.ReadLine

                objSW.WriteLine(strline)

            Loop While objSR.EndOfStream <> True


            objSW.Close()
            objSR.Close()

        Catch e As Exception
            Console.WriteLine("The process failed: {0}", e.ToString())
        End Try
    End Sub

End Module

Answer 1

По умолчанию StreamReader и StreamWriter будут использовать кодировку UTF-8.

Если это , а не исходная кодировка файла, я ожидаю увидеть эти проблемы - убедитесь, что файл является файлом UTF-8.