Hola, quisiera que alguien me ayude a saber porqué no me pone por defecto que el archivo a guardar es .txt, sino que me lo guarda sin extensión. El código que uso es el siguiente:
Dim nCanal As Integer
CommonDialog1.DialogTitle = "Guardar archivo"
CommonDialog1.Filter = "Archivos de texto (*.txt)/*.txt"
CommonDialog1.ShowSave
nCanal = FreeFile
Open CommonDialog1.FileName For Output As nCanal
Print #nCanal, text1.Text
Close #nCanal
Exit Sub
Espero sus ayudas, GRACIAS!
