estoy intentando hacer un editor de texto
el problema surge cuando quiero guardar el text como un archivo
ya que si no especifico la extensión cuando ingreso el nombre no me lo guarda
el codigo q tiene es este
On Local Error Resume Nex
CommonDialog1.CancelError = True
CommonDialog1.DefaultExt = "*.txt"
CommonDialog1.Filter = "Documentos de texto (*.txt)"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Print #1, Text1
Close
saben por que no me crea el archivo ????
ya encontre el problema
en vez de ser
CommonDialog1.DefaultExt = "*.txt"
era
CommonDialog1.DefaultExt = ".txt"
disculpen