粗暴一些:
Output.Logs("删除日志").Save("C:\Delete.txt",True)
dim s as string = filesys.readalltext("c:\delete.txt")