Progress bar con FORM che non si vede

[RAVALON]

Salve a tutti..

mi succede una cosa strana che non so da cosa dipenda mentre uso una progress bar....

se faccio un ciclo di prova, vedo la preogressione della barra ma non tutto il resto del FORM che la contiene (frmWorking)

da cosa dipende?

ecco il codice usato in un commandbutton

Private Sub Command1_Click()
Dim i As Long
With frmWorking
.fraWorking.Caption = "Prova in corso..."
.PbarWorking.Min = 1
.PbarWorking.Max = 30000
.PbarWorking.Visible = True
.PbarWorking.Value = .PbarWorking.Min
.Show
For i = 1 To 30000
.PbarWorking.Value = i
Next i
.PbarWorking.Visible = False
.PbarWorking.Value = .PbarWorking.Min
Unload frmWorking
End With
End Sub

[Sypher]

Dovrebbe funzionare...io ho incollato così com'è il tuo codice e il form me lo fa vedere l'unico problema è la visualizzazione di "prova in corso...",non so perchè la label non viene valorizzata!

[MMarzia]

un DoEvents dopo l'assegnazione della caption e si sistema tutto

[Sypher]

Mmm...ok è vero! Mi chiarisci le idee sul DoEvents(lo conosco ma non l'ho mai usato!)!

[MMarzia]

Originariamente inviato da Sypher
Mi chiarisci le idee sul DoEvents(lo conosco ma non l'ho mai usato!)!

ma certo!

http://programmazione.html.it/visualbasic/faq/61.htm

[Sypher]

Originariamente inviato da MMarzia
ma certo!

http://programmazione.html.it/visualbasic/faq/61.htm

Grazie ...non mi andava di cercarlo

[MMarzia]

Originariamente inviato da Sypher
Grazie ...non mi andava di cercarlo

ti ho mandato il link solo perchè ora che riesco a formulare una frase di senso compiuto ... uuufff

[RAVALON]

Grazie.....sto DO EVENTS sistema tutto ? Ok proverò

[MMarzia]

provato personalmente

[RAVALON]

infatti funziona :tongue:

Grazie!