Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open?
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
buenas gente,

resulta que quiero ejecutar un simple bucle despues que termine de cargar el formulario, cuando el formulario queda a la espera de que el usuario interactue,
como se hace eso??

bucle:

Public Sub ParpadeoFlecha()
  Dim x As Integer
 
  For x = 1 To 15
    PBoxFlecha.Visible = True
    Wait 0.1
    PBoxFlecha.Visible = False
  Next
 
End

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
V3ctor:

Para lo que quieres hacer ( un ParpadeoFlecha ), yo usaria un control timer

http://cursogambas.blogspot.com.es/...ales-timer.html

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
jsbsan escribió: [Ver mensaje]
V3ctor:

Para lo que quieres hacer ( un ParpadeoFlecha ), yo usaria un control timer


gracias funciona perfecto
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
me esta pasando lo siguiente funciona todo bien pero... al cerrar el formulario de la cruz de arriba a la derecha me da el error objeto invalido
en que le estoy errando?

  
Public Sub Form_Open()
  Timer1.Start
End

Public Sub Timer1_Timer()
  PBoxFlecha.Visible = True
  Wait 0.4
  PBoxFlecha.Visible = False    'objeto invalido
  Wait 0.1
End


Public Sub Form_Close()
  Timer1.Stop
  FMain.Enabled = True
 End

Public Sub btnSalir_Click()
  Timer1.Stop
  FMain.Enabled = True
  Me.close
  FMain.Minimized = False
  FMain.SetFocus
  FMain.sonidoGo.Play
End
 

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
cambie el código por este, y creo que no da problema  


Public Sub Timer1_Timer()

If PBoxFlecha.Visible = True Then
    PBoxFlecha.Visible = False
    Wait 0.1
Else
    PBoxFlecha.Visible = True
    Wait 0.1
Endif

 
End

 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
Public Sub Timer1_Timer()

PBoxFlecha.Visible = NOT PBoxFlecha.Visible

End
 

 



 
razaAztk - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuarioVer la galería personal del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Como Ejecutar Un Bucle Despues Inmediatamente De Terminado Form_open? 
 
razaAztk escribió: [Ver mensaje]
Public Sub Timer1_Timer()

PBoxFlecha.Visible = NOT PBoxFlecha.Visible

End
 


tomo tu sugerencia es simple y efectiva, también vi las virtudes de not en una subrutina que propuso jguardon, con lo cual voy viendo formas de usar NOT interesantes, gracias.
 




===================
Software libre, programación libre, vida libre es la Public function Libertad()as Invendible
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
 
v3ctor - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Ejecutar Comandos Shell Desde Gambas Como ... Elena General 6 Viernes, 03 Febrero 2012, 03:30 Ver último mensaje
Agamenon
No hay nuevos mensajes Como Parar Un Programa Gambas Que Entra En... Shell General 2 Viernes, 13 Abril 2012, 08:05 Ver último mensaje
Shell
No hay nuevos mensajes Como Limpio Los Checkbox De Un Formulario ... metalgearxd General 20 Martes, 05 Marzo 2013, 14:29 Ver último mensaje
Dani26
No hay nuevos mensajes Decimales Como Valor De Incremento En Bucle Shell General 2 Domingo, 21 Abril 2013, 08:33 Ver último mensaje
Shell
 

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