[SOLUCIONADO]Formulario "Cargando..."

Iniciado por diego_lp, 19 Marzo 2010, 14:43 PM

0 Miembros y 1 Visitante están viendo este tema.

diego_lp

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:
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.
Los programadores hicimos un pacto con Dios, él no hace sistemas y nosotros no hacemos milagros!

raul338

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

prueba con esto

Código (vbnet) [Seleccionar]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   Do
       ProgressBar1.Value += 10 ' Taaaarda mucho si sube en uno xD
       For i As Int16 = 0 To Int16.MaxValue
           Application.DoEvents()
       Next
   While Not ProgressBar1.Value = 100
   Me.Close()
   FormPrincipal.Show()
End Sub


Creo que se entiende no?

diego_lp

Jeje perfecto Raul338, muchas gracias!
Se entiende perfectamente xD
Muchas gracias.
Saludos.
Los programadores hicimos un pacto con Dios, él no hace sistemas y nosotros no hacemos milagros!