elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  [SOLUCIONADO]Formulario "Cargando..."
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [SOLUCIONADO]Formulario "Cargando..."  (Leído 4,734 veces)
diego_lp

Desconectado Desconectado

Mensajes: 180


In a free world, who needs gates and windows?


Ver Perfil WWW
[SOLUCIONADO]Formulario "Cargando..."
« en: 19 Marzo 2010, 14:43 pm »

Hola a todos, mi problema es simple, quiero crear un formulario con un progress bar, en el load del formulario hago un bucle infinito que le da valores al progress bar, pero cuando lo compilo nunca me llega a cargar el formulario, es decir, a mistrarme el formulario con el progress bar, simplemente se cuelga en el bucle, no se si tengo que escribirlo de alguna otra forma o tenga que usar un thread.
El codigo es bien simple:
Código:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        While True
            ProgressBar1.Value = 100
        End While
    End Sub
Tal vez alguno me pueda dar una mano.
Muchas gracias.
Saludos.


« Última modificación: 22 Marzo 2010, 22:39 pm por diego_lp » En línea

Los programadores hicimos un pacto con Dios, él no hace sistemas y nosotros no hacemos milagros!
raul338


Desconectado Desconectado

Mensajes: 2.633


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: Formulario "Cargando..."
« Respuesta #1 en: 19 Marzo 2010, 15:07 pm »

pero el bucle infinito nunca termina, el formulario nunca terminara de cargar :xD

prueba con esto

Código
  1. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  2.    Do
  3.        ProgressBar1.Value += 10 ' Taaaarda mucho si sube en uno xD
  4.        For i As Int16 = 0 To Int16.MaxValue
  5.            Application.DoEvents()
  6.        Next
  7.    While Not ProgressBar1.Value = 100
  8.    Me.Close()
  9.    FormPrincipal.Show()
  10. End Sub
  11.  

Creo que se entiende no?


« Última modificación: 19 Marzo 2010, 15:11 pm por raul338 » En línea

diego_lp

Desconectado Desconectado

Mensajes: 180


In a free world, who needs gates and windows?


Ver Perfil WWW
Re: Formulario "Cargando..."
« Respuesta #2 en: 19 Marzo 2010, 15:21 pm »

Jeje perfecto Raul338, muchas gracias!
Se entiende perfectamente xD
Muchas gracias.
Saludos.
En línea

Los programadores hicimos un pacto con Dios, él no hace sistemas y nosotros no hacemos milagros!
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
"Cargando...": Cómo la tecnología te manipula para que no te frustres con las...
Noticias
wolfbcn 0 1,651 Último mensaje 23 Octubre 2017, 02:37 am
por wolfbcn
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines