Como crear un txt al ejecutar el formulario por primera ves?

[basdower]

Hola he encontrado una solución pos si alguien la desea

If My.Computer.FileSystem.FileExists("C:\archivo.txt") Then 'comprueba si el archivo existe
Else
Dim sw As New System.IO.StreamWriter("c:\archivo.txt") 'Crea el archivo si es que no existe con las siguientes lineas (si existe no lo remplaza)
sw.WriteLine("Usuario")
sw.WriteLine("Contraseña")
sw.Close()
End If

Salu2