【VBA自学笔记(三)】StreamWrite与StreamRead——UTF-8的读写
Sub StreamWrite(path, st)Dim stmSet stm = CreateObject("Adodb.Stream") stm.Type = 2 stm.Mode = 3 stm.Charset = "UTF-8" stm.Open stm.WriteText = st stm.SaveToFile (path), 2 '
