8の復号 FunctionUTF8ByteToString(bb() As Byte) As String ' UTF-8のバイナリから作成されたバイト配列を参照して、UTF-8の文字列に変換する Dim ConvertStr As String 'Dim sr As New ADODB.Stream Call CreateObjectADODB With sr .Type= adTypeBinary .Open.Write bb 'bbにはカッコがつか...