Question

VB问题，请问写数据怎么才能在后面添加，而不是覆盖已有数据？

在关闭重启后同样生效

若以下回答无法解决问题，邀请你更新回答

Answer 1

你好，很高兴为你解答：

你应该是写文件吧，改为Append写入即可：

    Open App.Path & "\data.txt" For Append As #1
    Print #1, "test"
    Close #1

-----------------------------------
如有疑问欢迎追问！
满意请点击右上方【选为满意回答】按钮么么哒 o(∩_∩)o

追问

这个不是VB.net 啊

追答

你在题目中说的是VB额~~

Imports System.IO '写操作
　　Dim strFilePath As String = "C:\data.txt"
　　Dim sw As StreamWriter = New StreamWriter（strFilePath， True）'true是指以追加的方式打开指定文件
　　For i = 0 To j
　　temp = i.ToString
　　sw.WriteLine（temp）
　　sw.Flush()
　　Next
　　sw.Close()
　　sw = Nothing

首先要说明的是构造函数new
　　Public Sub New（path， append， Encoding）
　　path：要打开文件的完整路径，如果文件不存在则自动建立一个新的文件。
　　append：缺省值为false，指示是否以追加方式打开指定文件。false——如果存在path指定的文件，则覆盖原文件，否则建立一个新文件；true——如果存在path指定的文件，则打开该文件，以追加数据的方式在文尾写数据，否则建立一个新文件。
　　Encoding：缺省值为System.Text.Encoding.Default，即使用系统缺省的编码，指示以什么样的编码写文件。
　　WriterLine（str）：在文本中添加一个新行，同时在行尾加上回车换行符

追问

对excel行不通啊

追答

excel不支持.net

追问

那我给你看看代码你找找问题？

追答

Excel只能用于第一个代码