我明白你们的意思,
Dim doc As New XmlDocument
doc.LoadXml("<dataroot></dataroot>")
Dim root As XmlNode = doc.SelectSingleNode("dataroot")
Dim xe1 As XmlElement = doc.CreateElement("SourceDatabase")
Dim xe2 As XmlElement = doc.CreateElement("DatabaseID")
Dim xe3 As XmlElement = doc.CreateElement("DatabaseName")
Dim xe4 As XmlElement = doc.CreateElement("DatabaseIDNum")