我有以下序列化方法:
Private Function SerializeData(ByVal data As cData) As String
If data IsNot Nothing Then
Dim xml_stream As New MemoryStream()
Dim sr As StreamReader
Dim xs As New XmlSerializer(GetType(cData))
xml_stream = New MemoryStream()
Try
xs.Serialize(xml_stream, data)
xml_stream.Position = 0
sr = New StreamReader(xml_stream)
Return sr.ReadToEnd()
Finally
If sr IsNot Nothing Then sr.Close()
xml_stream.Close()
End Try
Else
Return "No data"
End If
End Function
但是它返回缩进的嵌套元素的xml。有没有办法在序列化程序上关闭它,还是我需要运行一个查找替换例程来摆脱它?
本质上,我想看到的是:
<root><child1>data</child1><child2>data</child2></root>