Question

我编写代码来创建summary.txt文件并为其编写一些行。

这是代码：

Dim FileToSaveAs As String = SaveFileDialog1.FileName
Dim File As New System.IO.StreamWriter(FileToSaveAs)

File.WriteLine("Date and time" & " " & DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss"))
File.WriteLine(" ")
File.WriteLine("Client Number: " & " " & Clients)
File.WriteLine("")
File.WriteLine("Beginning of new order:")
File.WriteLine("")

For index = 0 To OrderListBox.Items.Count - 1
    File.WriteLine(OrderListBox.Items(index))
Next

File.WriteLine("")
File.WriteLine("Price" & " " & "£" & " " & ZYZZ)
File.WriteLine("")
File.WriteLine("VAT" & " " & "£" & " " & VAT)
File.WriteLine("")
File.WriteLine("Total" & " " & "£" & " " & MAX)
File.WriteLine("")
File.WriteLine("")
File.WriteLine("")
File.WriteLine("______________________________________________________")
File.WriteLine("")
File.WriteLine("")
File.Close()

Clients = Clients + 1

这段代码基本上会创建并弹出一个新的保存文件对话框，然后用户决定在哪里保存它，这完全是我想要的。但是每当用户再次定位此代码时，它将再次触发保存文件对话框，这绝对是我不希望它做的。

我想要它做的是将新行添加到已保存的同一.txt文件中

任何帮助？

Answer 1

Dim File As New System.IO.StreamWriter(FileToSaveAs, True)

True表示新数据将附加到文件False以覆盖文件。如果指定的文件不存在，则此参数无效，构造函数将创建新文件。

在VB中保存和更新.txt文件

1 个答案: