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

名前

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

本文 この関数は本当にエラーなく動いてますか？ざっと見る限り bytBData(cnt_i) = "&H" + Mid(strBData, cnt_j * 2 - 1, 2) の部分でcnt_i=0のときエラーとなりませんか？ またバイト配列に入れるのであれば明示的に bytBData(cnt_i) = Val("&H" + Mid$(---)) としてやった方がいいかもしれません。 この関数の働きを半角２文字で表された１６進数の文字列から 先頭の２文字をとり、それを１バイトのバイナリーに変換する 関数と推測すると、これは以下の１行で書けるんじゃないでしょうか？ bytBData = Val("&H" + strBData)