MSGBOX E INPUTBOX

msgbox: Las cajas de mensajes o Message Box, tienen una función clara, que es la de mostrar una determinada información, aviso, o pregunta para que el usuario tenga conocimiento de ella y actúe.

Hay diferentes formas de mostrar información :
1) El aviso es sí, que tiene por objetivo mostrar una información de interés.
2) El aviso con espera de respuesta, que muestra una información esperando que el usuario seleccione una de las respuestas posibles para que el programa la trate.

Una caja de mensaje, puede ser por ejemplo, la instrucción MsgBox "Hola" .
Por defecto, la caja de mensaje será similar a esta :











Otra estructura mas expresa es la siguiente
msgbox "mensaje", numero"titulo"
msgbox"fin del juego" 16, " tetris"












los numeros varian el icono del msgbox:





inputbox:


El InputBox o caja de entrada es otra de las partes más utilizadas para la interacción del usuario con la aplicación. Es importante que el usuario interactúe con la aplicación para ser el protagonista de esta.

El InputBox nos permite sacar una caja donde el usuario pasará un parámetro, valor o dato para que el programa lo trate y lo ejecute.

El mensaje que quiere que aparezca se realiza de forma casi idéntica al MessageBox. Puede escribirse varias líneas de texto seguidas por la constante de Visual Basic VbCrLf o salto de línea o párrafo.

La sentencia es : Val = InputBox (Mensaje, Titulo, ValorPredeterminado)
Val almacenará el texto escrito por el usuario, que puede ser una cantida, cadena string, … etc.

Por ejemplo :
Dim Val As String
Val = InputBox("Deme su nombre", "Ejemplo")
MsgBox "Su nombre es: " & Val
Tiene como resultado :










5 comentarios:

diego chizavo dijo...

me sirvio de utilidad gracias por tu aporte

diego chizavo dijo...
Este comentario ha sido eliminado por el autor.
MARISOL dijo...

Gracias por la información :)

Andrea Bedolla dijo...

Me sirvió demasiado, ¡gracias!

matias ortega dijo...

Muchas gracias me re sirvio, ya q estamos pregunto, tenes idea como poner en orden alfavetico esto haciendo click en un command button ?
Option explict
Dim n as integer
Dim nombres(3) as string
Private sub cmdagregar_click()
for n=0 to 3
nombres(n)=inputbox("agregar nombres")
List1.additen numeros(n)
Next
end sub