Ciao,
Ho un problema con la progressbar.
Ho settato Min e Max e funziona tutto bene ma alla fine, quando value raggiunge 100 (Max), VB mi da errore. Ho provato usando degli If per disattivare il timer che aumentava di 1 il value della progress bar.
Ecco il codice dell'intero form (è poco)
Spero possiate aiutarmi. Graziecodice:Public Function timer() ProgressBar1.Min = 0 ProgressBar1.Max = 100 If ProgressBar1.Value = ProgressBar1.Max Then Command2.Enabled = True ElseIf ProgressBar1.Value = ProgressBar1.Max Then Timer1.Enabled = False End If ProgressBar1.Value = ProgressBar1.Value + 1 End Function Private Sub Form_Load() Command1.Enabled = True Command2.Enabled = False Command3.Enabled = True End Sub Private Sub Timer1_Timer() Call timer End Sub

)
Rispondi quotando