Visual Basic - crear un txt

hola estoy haciendo un programita k trabaja con txt mi preunta es la siguiente
cual es el codigo para crear un txt, no abrir uno ya creado

lo que debo hacer es crear un con la siguiente clausula

STCK_AAAMMDD
por supuesto lo ultimio hace referencia a la fecha de hoy
como lo hago :(


de ante mano gracias

Prueba esto:
Private Sub GuardarArchivo(Ruta As String, Nombre_Extencion As String)
Dim F, A
Set F = CreateObject("Scripting.FileSystemObject")
Set A = F.CreateTextFile(Ruta & "\" & Nombre_Extencion, True)
A.WriteLine "Esto escribe una cadena y un final de línea en la secuencia"
A.Write "Esto escribe una cadena en la secuencia. "
A.Write "Pero permite escribir luego en la misma linea."
A.WriteBlankLines (3) 'Deja 3 o n lineas en blanco
For i = 1 To 5
A.Write i
Next
A.Close 'cierra el archivo
Set F = Nothing 'Destruye los objectos
Set A = Nothing 'Destruye los objectos
End Sub

Suerte