昨日と逆の変換。 UTF-8バイト列にBOMがなくても変換される模様。 参照：Streamオブジェクト - ADOオブジェクト - MSDN Sub Sample() Dim buf(2) As Byte Dim s As String Dim i As Long buf(0) = &HE3 ' BOMなし buf(1) = &H81 buf(2) = &H82 With CreateOb…

ADODB.Streamオブジェクトにテキストで書き込んで、Typeプロパティをバイナリに変えてByteの配列として読み出す。 なお変換されたUTF-8バイト列にはBOMが付加されている。 参照：Streamオブジェクト - ADOオブジェクト - MSDN Sub Sample() Dim buf() As Byt…