如题!
Dim MyFile As IO.MemoryStream
Dim MyEncoding As System.Text.Encoding = System.Text.Encoding.GetEncoding("GB2312")
Dim MyWriter As New XmlTextWriter(FileName, MyEncoding)
MyWriter.Formatting = Formatting.Indented
MyWriter.Indentation = 4