摘要： 写DimstrFilePathAsString=SaveFileDialog1.FileNameDimswAsStreamWriter=NewStreamWriter（strFilePath，True）'true是指以追加的方式打开指定文件Fori=0Tojtemp=i.ToStringsw.WriteLine（temp）sw.Flush（）Nextsw.Close（）sw=Nothing读DimlineAsStringDimsrAsStreamReader=NewStreamReader（strPath，System.Text.Encoding.Default）DoWhilesr.P 阅读全文