Dim saveFile As New SaveFileDialog() saveFile.InitialDirectory = "Desktop" saveFile.FileName = fb.Text saveFile.Filter = "XML Files Only(*.XML) | *.XML" saveFile.ShowDialog() Dim doc As XmlDocument = New XmlDocument() doc.LoadXml(GenCodeText.Text) doc.PreserveWhitespace = false doc.Save(saveFile.FileName)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)