Encoding (.net) ?

[LSL]

Не встречались с такой проблемой ?

Private Sub LoadReadmeFile()
	Dim fs As FileStream
	Dim sr As StreamReader
	Dim strReadme As String = Application.StartupPath + "\Readme.txt"
	If File.Exists(strReadme) Then
		fs = New FileStream(strReadme, FileMode.Open, FileAccess.Read, FileShare.Read)
		sr = New StreamReader(fs)
		Dim str As String
		str = sr.ReadToEnd
		sr.Close()
		fs.Close()

		txtReadme.Text = str
	End If
End Sub

В текстбоксе не видны русские буквы, не просто заменены квадратиками а "вырезаны" вообще.

Шрифт-кириллица, видимо, при загрузке файла происходит что-то с кодировкой.

[vicmb]

Public Sub New( _
ByVal stream As Stream, _
ByVal encoding As Encoding, _
ByVal detectEncodingFromByteOrderMarks As Boolean, _
ByVal bufferSize As Integer _
)

Это один из конструкторов StreamReader, собс-но тебе нужен Encoding.
RTFM

[LSL]

sr = New StreamReader(fs, System.Text.Encoding.GetEncoding("windows-1251"))

Спасибо vicmb, как говорится "конструктор-то я и не заметил".

[vicmb]

LSL, не за что