バイナリデータを変換するには2？ (ID:83312)

名前

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

本文 つまり&HE2E2のシフトJISコードを持つ「粐」という文字が取得できればよいのでしょうか？ であればChr関数で実現できます Dim aaa(1) As Byte Dim bbb As String aaa(0) = &HE2 aaa(1) = &HE2 bbb = Chr((CLng(aaa(0)) * &H100& And &HFF00&) + (CLng(aaa(1)) And &HFF&)) バイト型は符号付なので符号を消して２バイトを合成するところがポイントでしょうか