文字コードを変数として取得

注意事項

このサイト内で公開していることがらについて

使用や利用によるいかなる損失に対しても責任を負いませんのでご了承ください。

著作物に関する著作権について

原則としてすべて運営者(EponaLab)にあります。

ソースコード

'UTF-8
System.Text.Encoding.GetEncoding("UTF-8")
'Shift-JIS
System.Text.Encoding.GetEncoding("Shift_JIS")
'EUC-JP
System.Text.Encoding.GetEncoding("EUC-JP")
                

使用例

Dim MyEnc As System.Text.Encoding = System.Text.Encoding.GetEncoding("UTF-8")