https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html 「目的の文字コードに合ったEncodingオブジェクトを取得する」に投稿されたコメントの一覧 ja https://dobon.net/banner/dbs1.gif https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html 88 31 https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#7 もう回答見つかったと思いますが、自分用の覚書に書いておきます。 System.Text.Encoding.RegisterProvider(System.Text.CodePagesEncodingProvider.Instance); // memo: Shift-JISを扱うためのおまじない]]> https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#6 System.ArgumentException: ''shift_jis' is not a supported encoding name. For information on defining a custom encoding, see the documentation for the Encoding.RegisterProvider method. (Parameter 'name')'

' サンプルソース
Dim shiftJISEncoding As Encoding = System.Text.Encoding.GetEncoding("shift_jis")
MsgBox("Shift_JIS Encoding: " & shiftJISEncoding.EncodingName)

「932」指定時も同様で、「utf-8」ではエラーなしです。
当方でも対処法を調べていますが、解決済みの方がいらっしゃいましたら、ご教示ください。
ちなみに System.Text.Encording.Default.EncordingName は Shift_JIS Encording; Unicord (UTF-8)でした]]> https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#5 おかげで面白い判別方法が見つかりました。

例
Dim bytText As Byte() = New Byte() {49, 0, 50, 0, 51, 0, 65, 0, 66, 0, 67, 0, 66, 48, 68, 48, 70, 48}
Dim bytCheck As Byte() = New Byte() {}
Dim strCheck As String = ""
strCheck = System.Text.Encoding.GetEncoding("utf-16").GetString(bytText)
bytCheck = System.Text.Encoding.GetEncoding("utf-16").GetBytes(strCheck)
If bytText.SequenceEqual(bytCheck) = true Then
Console.WriteLine("utf-16である")
End If]]> https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#4 内容が薄い。
言い換えると無駄な内容が多い。]]> https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#3 まとまっていない。
長い割に、当たり前の事しか書いていない。]]> https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#2 https://dobon.net/cgi-bin/pc/pc.php?mode=v&id=string%2Fgetencodingobject.html#1 内部リソースとしてhtmlを書き出すメソッドを解決できました。]]>