Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Como Cancelar U Evento Click Button
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Como Cancelar U Evento Click Button 
 
Buenas...

Estoy programando un formuario y quiero que cuando alguien presione el boton ok y este evalue que ciertos cuadros estan vacios no siga, ya que le coloco STOP EVENT y no lo toma en cuenta y sigue como si nada y me crea un error en el formulario porque este necesita los valores que el otro no le pudo enviar por haber cuadros vacios...

Aqui presento el codigo del evento del boton:

Public Sub btnOK_Click()
Dim consul As Boolean = False
Dim dat As String
  If materia1.Text = "" And materia.Text = "" Then
    Message.Error("Por favor Especifique la Materia antes de Continuar")
    Stop Event
    Else If Not materia1.Text = "" Then
      mat = materia1.Text
      Else
      mat = materia.Text
      consul = True
  Endif
  
  If profesor1.Text = "" And profesor.Text = "" Then
    Message.Error("Por favor Especifique el Profesor que Imparte la Materia antes de Continuar")
    Stop Event
    Else If Not profesor1.Text = "" Then
      prof = profesor1.Text
      Else
      prof = profesor.Text
      consul = True  
  Endif
  
  If seccion1.Text = "" And seccion.Text = "" Then
    Message.Error("Por favor Especifique la Sección antes de Continuar")
    Stop Event
    Else If Not seccion1.Text = "" Then
      secc = seccion1.Text
      Else
      secc = seccion.Text
      consul = True
  Endif
  
  If consul Then
    conexclass.tablapet = "materia"
    dat = Subst$("'&1', '&2', '&3'", mat, prof, secc)
    conexclass.insertardatos("nommat, nomprof, seccion", dat)
  Endif
  
  Print mat
  Print prof
  Print secc
  Notas.show
  Me.Close(True)
End

 



 
Trydents - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Cancelar U Evento Click Button 
 
Public Sub btnOK_Click()
Dim consul As Boolean = False
Dim dat As String
  If materia1.Text = "" And materia.Text = "" Then
    Message.Error("Por favor Especifique la Materia antes de Continuar")
  
else
      mat = materia1.Text
      prof = profesor.Text
      consul = True  

  Endif


 de esta manera me funciona a mi. trata de probar


es una condición si lo primero no se cumple entonces te dara el mensaje y el evento o proceso se detendrá.  de lo contrario simple mente dara lo contrario  despues del else.

es sencillo yo lo uso todo el tiempo. (en mi caso no uso el stop event)

por que el if reconoce si se cumple la condicion con la sentencia que nosotros especifiquemos

saludos suerte
 



 
última edición por soldadozero el Lunes, 08 Julio 2013, 16:32; editado 1 vez 
soldadozero - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Cancelar U Evento Click Button 
 
Es un pequeño error de concepto. Stop Event no detiene el flujo del código disparado por el evento. Lo que hace es que ese evento no siga procesándose después del código.

Si tú no tecleas ningún código, un evento sigue siendo un evento. Es decir, si tú no tecleas nada en un campo de texto, pulsar la tecla del tabulador tiene un efecto (pasar al campo siguiente).
Si tú generas un código para el evento key_release, por ejemplo, primero se ejecuta tu código y luego se ejecuta el comportamiento normal de la tecla.
Stop Event se supone que evita eso. Se procesa tu código, pero no se ejecuta ese comportamiento normal.

Si lo que quieres es detener el flujo del proceso del evento, usa Return.

Saludos.
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Cancelar U Evento Click Button 
 
Gracias... Precisamente eso era lo que estaba buscando... Soy nuevo en gambas...
 



 
Trydents - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Tabstrip Y El Evento Click lumbanico Controles/Librerías/Componentes 3 Viernes, 28 Septiembre 2012, 10:29 Ver último mensaje
lumbanico
No hay nuevos mensajes Evento Click ¿Que Boton Fue Presionado? tincho Aplicaciones/Fragmentos de Código 0 Sabado, 04 Junio 2016, 12:01 Ver último mensaje
tincho
No hay nuevos mensajes Botón. Evento Click Y Mousedown Shell General 5 Domingo, 01 Octobre 2017, 18:47 Ver último mensaje
Shell
No hay nuevos mensajes Como Detectar Evento Click En Notify-send v3ctor Mundo Linux 0 Miercoles, 08 Agosto 2018, 11:32 Ver último mensaje
v3ctor
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
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



  

 

cron