1. En el botón (Command Button), vas a declarar las variables de mensaje y nombre.
2. En la variable mensaje vas a colocar el mensaje que quieres que aparezca para que cuando lo corras y le des clic en el botón (Command Button) te lo muestre.
3. En la variable nombre vas a colocar InputBox$ (mensaje) para que pueda colocarse lo que escribas al momento de correr el programa.
4. Finalmente vas a declarar la variable lblMensaje.
Va a quedarte de la siguiente manera:
Private sub command1_Click ()
Dim mensaje, nombre
mensaje = "Introduce tu nombre"
nombre = InputBox$ (mensaje)
lblMensaje.Caption = nombre
No hay comentarios:
Publicar un comentario