09/02/2009, 10:32
|
| Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 3 meses Puntos: 37 | |
| Respuesta: Common dialog guardar como, boton guardar, mensaje de texto
Cita:
Iniciado por Rossanalie  Hola
Tengo un botón que llama a un common dialog guardar como. El problema es que el mensaje de texto "Debe escribir un nombre de archivo"aparece cuando marco el boton cancelar y quiero que aparezca cuando marco el boton guardar y que aparezca encima de el cuadro de dialogo guardar como.. Este es el código
If CommonDialog1.FileName = "" Then
MsgBox "Debe escribir un nombre de archivo", vbInformation, "Sistema"
'Salimos de la rutina ya que no hay nada que guardar
Exit Sub
Else
'Creamos un archivo con la sentencia OutPut, pasandole la ruta _
con la propiedad FileName del Commondialog
Open CommonDialog1.FileName For Output As #1
'Escribimos en el archivo el contenido de Text1
Print #1, Text1
'Cerramos el archivo
Close
End If Hola
te refieres a algo como esto? CommonDialog1.FileName = "Debe escribir un nombre de archivo..."
CommonDialog1.ShowSave  |