Ayuda Message


Objetivo: Ayuda Message
Hola quiero programar un boton se salir!

Message.Question("Deseas Salir", "Si", "No")
IF Button1_Click = 0 THEN
QUIT
END IF

pero me da error!
dice type mismatch: wanted numer....

Perfil MP  
Objetivo: Re: Ayuda Message
Button1 es una clase, no puede ser igual a 0.
Button1_Click es un evento, tampoco puede ser igual a =0.
Sitúate encima del botón creado, pulsa botón derecho->eventos y elige el evento Click. Entonces prueba éste código:


dim n as integer 'Declaras n como variable de tipo integer
n=Message.Question("Deseas Salir", "Si", "No") 'La función message devuelve el número de opción
IF n = 1 THEN
QUIT
END IF


Para iniciarte te aconsejo el libro de Daniel Ridruejo que puedes encontrar en la sección de descargas de éste mismo portal.

Suerte

última edición por shordi el Jueves, 29 Septiembre 2011, 07:13; editado 1 vez
Perfil MP  
Objetivo: Re: Ayuda Message
Excelente! Amigo Funciono! Gracias!
Ok ya descargo el el libro!

Perfil MP  

Página 1 de 1


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.0879s (PHP: -36% SQL: 136%)
Consultas SQL: 24 - Debug off - GZIP Activado