Dim writer As System.IO.StreamWriter
writer = New System.IO.StreamWriter("c:\work\foobar.txt")
writer.Write("hogehoge" & vbCRLF)
writer.Close()
Dim writer As System.IO.StreamWriter
writer = New System.IO.StreamWriter("c:\work\foobar" + DateTime.Now.ToString("yyyyMMddHHmmss") + ".txt")
writer.Write("hogehoge" & vbCRLF)
writer.Close()
Dim xmlDoc As New XmlDocument
' 読み込み処理等
xmlDoc.Save("c:\tmp\"+DateTime.Now.ToString("yyyyMMddHHmmss")+".xml")