> Dim buf(1) As Byteこれだと、buf(0) と buf(1) の 2バイトの領域を意味しますが、それでよいのですか?> MsgBox buf ←←← 16進コードで表示等をしたい。MsgBox Hex(buf(0)) & vbNewLine & Hex(buf(1))とか。