Конвертация строки из Windows-1251 в UTF-8

Пример функции на VB.NET для конвертация строки из Windows-1251 в UTF-8 .
Лично я потратил на составление этой функции часа два. Надеюсь тому кто ее найдет повезет больше.


' Конвертация строки из Windows-1251 в UTF-8
Protected Function Conv(ByVal s As String) As String
Dim utf8 As Encoding = Encoding.GetEncoding("utf-8")
Dim win1251 As Encoding = Encoding.GetEncoding("windows-1251")
' строка в массив
Dim a1 As Byte() = win1251.GetBytes(s)
' конвертация массива
Dim a2 As Byte() = Encoding.Convert(win1251, utf8, a1)
' массив в строку
Dim Result As String = utf8.GetString(a2)
' возвращаем результат
Return Result
End Function

На первый взгляд поражаешься отсутствию такой простой встроенной функции, но на второй взгляд она оказывается совершенно не нужной. В моем случае после того, как я разобрался со всеми преобразованиями оказалось, что конвертировать нужно непосредственно при чтении из файла, а в процедуре чтения уже заботливо вставлен параметр для указания кодовой страницы.

За два часа прошу не судить меня строго, VB все же не мой «родной язык».