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