30.04.2013 Views

1. Visual Basic - Curso completo teoria y practica

1. Visual Basic - Curso completo teoria y practica

1. Visual Basic - Curso completo teoria y practica

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

En caso de que el usuario elija la opción “Sí”, la<br />

aplicación debe terminar. En caso contrario, es decir si el<br />

usuario elige la opción “No”, se debe proseguir con la<br />

aplicación.<br />

Para el desarrollo del presente ejemplo, proceda a ubicar<br />

sobre el formulario un botón de comando (CmdSalir), a<br />

continuación ingresar el siguiente código:<br />

Private Sub CmdSalir_Click()<br />

End Sub<br />

Dim RESP As Integer<br />

RESP = MsgBox(“Desea terminar la aplicación?”, _<br />

vbQuestion + vbYesNo, “Pregunta”)<br />

If RESP = vbYes Then<br />

End If<br />

End<br />

Para ilustrar mejor el uso de la función MsgBox() vamos a<br />

desarrollar la siguiente aplicación que permite mostrar los<br />

diferentes tipos de botones e iconos generados por la función.<br />

Pág. 96

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!