2019-06-27から1日間の記事一覧
自分用メモです。 Dim ADOST As ObjectSet ADOST = CreateObject("ADOST.Stream") With ADOST.Charaset = "UTF-8".LineSeparator = adLF.Open .WriteText "aaa", adWriteLine.WriteText vbTab & "bbb", adWriteLine.WriteText "ccc", adWriteLine .Position …