Shift-Jisの2バイトコードを取得するには？ (ID:142552)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 自己レスです。 色々と調べた結果、以下のようにShift-JISにエンコードしたもののバイト配列を取得するようにしても希望する結果が得られることが分かりました。 Dim sjText As String = "亜" Dim sjCode As String = "" Dim byt() As Byte = System.Text.Encoding.GetEncoding("shift_jis").GetBytes(sjText) For i = 0 To byt.Length - 1 sjCode &= Hex(byt(i)) Next MsgBox(sjCode) この方がスマートだし、複数の文字の場合もそのまま使えそうです。 お騒がせしました。