Imports System.IO
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Dim oSW As New StreamWriter("C:\prueba.txt")
 
        Dim vLinea As String = "Soy una linea"
        oSW.WriteLine(vLinea)
        oSW.Flush()
        oSW.Close()
    End Sub
End Class