我曾经被教导如何使用以下代码附加文本文件,但是每次按下按钮一时如何覆盖该文件(没有人教我)?
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
下课
StreamWriter构造函数的签名是这样的:
public StreamWriter(string path,bool append )
所以改变你的代码:
System.IO.StreamWriter(ALPHAVAL, True)
to :
System.IO.StreamWriter(ALPHAVAL, False)
这说明流写入器 http://msdn.microsoft.com/en-us/library/36b035cb.aspx覆盖文件。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)