Imports System
Imports System.IO
Imports System.Text
Public Class Test
Public Shared Sub Main()
Dim FileName As String= "test.txt"
Dim TextToAdd As String = "data"
Dim SwFromFile As StreamWriter = New StreamWriter(FileName)
SwFromFile.Write(TextToAdd)
SwFromFile.Flush()
SwFromFile.Close()
End Sub
End Class