如何在VB.NET中覆盖文本

Question

我曾经学过如何使用以下代码附加文本文件，但是每次按下按钮1时，我如何覆盖该文件呢？（没有人教我）

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim ALPHAVAL As String = "C:\ALPHAVAL.txt"

    If System.IO.File.Exists(ALPHAVAL) = True Then
        Dim objWriter As New System.IO.StreamWriter(ALPHAVAL, True)
        objWriter.WriteLine(TextBox1.Text)
        objWriter.Close()
    End If

结束类

- Mac

Answer 1

StreamWriter构造函数的签名如下：

public StreamWriter(string path,bool append  )

所以请修改您的代码：

System.IO.StreamWriter(ALPHAVAL, True)

致：

 System.IO.StreamWriter(ALPHAVAL, False)

这告诉StreamWriter要覆盖文件。

- Shekhar_Pro