RE:como podria hacer un (Guardar como) ...
Aquí te va esto, espero te sirva.
- Lo más fácil para obtener el nombre del archivo al que se va a guardar es incluir un control CommonDialog
- Suponiendo que el textbox se llama txtBox y el CommonDialog se llama dlgCommon, y se guardará el archivo al hacer clic en un botón de menú llamado mnuArchivoGuardar:
On Error GoTo Cancelar
Dim sArchivo As String
'para que el commondialog genere el error 32755
'si el usuario selecciona cancelar
dlgCommon.CancelError = True
'mostramos el diálogo guardar
dlgCommon.ShowSave
'obtenemos el nombre con el que se guardará el archivo
sArchivo = dlgCommon.FileName
'creamos un archivo o lo abrimos para escribir en él
Open sArchivo For Output As #1
'escribimos el contenido del textbox en el archivo
Print #1, txtBox.Text
Close #1
Exit Sub
'si hubo algún error durante la operación
Cancelar:
'el error 32755 se da cuando el usuario seleccionó cancelar
'si no es esta la razón por la que tuvimos un error
'mostramos un aviso
If Err <> 32755 Then
MsgBox "No se pudo guardar el archivo", vbExclamation
End If
End Sub
- Sólo faltarían algunas cosas, como las propiedades del commondialog (la extensión de archivos, las flags, y tal vez el título del diálogo si deseas cambiarlo)
- También podrías usar un control RichTextBox, que te haría más fácil el cargar y guardar archivos, ya que puedes usar los métodos RichTextBox.SaveFile y RichTextBox.LoadFile
- Espero te sea de ayuda.