引数にバイト配列を指定するには？ (ID:74729)

名前

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

本文 やってみたところ、すごく早くなりました。ありがとうございます。 ところで、あとは文字列変換ですけど、 Public Function AsString(bytecode As String) As String Dim i As Long, bit() As Byte ReDim bit(Len(bytecode) / 2) For i = 1 To Len(bytecode) / 2 bit(i) = "&H" & Mid(bytecode, (i + i - 1), 2) Next AsString = StrConv(bit, vbUnicode) End Function としてみたら、からの文字列しか返ってきませんでした。 引数には、同じMIDIファイルの26バイト目から22バイト分をあつめて、Hexs(Hexのテーブル化したもの)で文字列にしたものです。 vbFromUnicodeを使ったら、ヘンな文字が返ってきたので、 失敗して空っぽの文字列になったというわけではないようです。けど…。