Prog/.NET/文字のエンコードの履歴(No.1)

履歴一覧
差分を表示
現在との差分を表示
ソースを表示
Prog/.NET/文字のエンコードへ行く。
- 1 (2005-01-13 (木) 09:24:43)

文字のエンコード†

http://www.picfun.com/equipj53.htmlにて紹介されている、ＰＣ側ソフトウェアに、以下のようなコードが含まれています。

Dim data() As Byte
data() = StrConv(Left(Text2.Text & "                ", 16), 128)

これは、VisualBasic内部で文字の扱いがUNICODEで行われているので、それをASCII CODEに変換するコードです。

ところが、このコードはVB.NETでは互換性が無く、自動変換されたコードを実行しても、実行中に例外が発生します。

'UPGRADE_TODO: System.Text.UnicodeEncoding.Unicode.GetBytes() を使うためにコードがアップグレードされましたが、動作が異なる可能性があります。 詳細については、'ms-help://MS.VSCC/commoner/redir/redirect.htm?keyword="vbup1059"' をクリックしてください。
'data = System.Text.UnicodeEncoding.Unicode.GetBytes(StrConv(VB.Left(Text2.Text & "                ", 16), 128))

そこで、 http://www.atmarkit.co.jp/fdotnet/dotnettips/010str2byte/str2byte.html を参考にし、以下のようなコードを用意しました。

'UNICODE->ASCII変換
asciiEnc = Encoding.GetEncoding("ascii")
data = asciiEnc.GetBytes(VB.Left(Text1.Text & "                ", 16))
Console.WriteLine(BitConverter.ToString(data))

１行目：変換後の文字コードを指定します。"ascii"の他にも選択可能。（詳細は"GetEncoding"メソッドのマニュアルをご覧下さい）
２行目：Textコントロール"Text1"に入力されている文字を、左から16文字分ASCII Codeに変換します。
３行目：コンソールにASCII Codeで出力します。

2005-01-13 (木) 09:24:43

プログラミング

Prog/.NET/文字のエンコード の履歴(No.1)

文字のエンコード†

Prog/.NET/文字のエンコードの履歴(No.1)