[VB6] Progress Bar

[lucausa75]

Salve ragazzi,

volevo capire come utilizzare la Progress Bar di Visual Basic 6.

Volevo creare un programmino che mi popola una MSHFlegrid.

Ho realizzato già tutto però mi manca associare la progress bar.

Cioè ogni volta che la griglia aumenta di uno la progress bar deve avanzare.

So che bisogna impostare la proprità MIN e MAX della progress bar.
Il MIN deve essere zero ma il MAX è variabile; cioè la griglia può essere formata da 1, 10, 100, 1000 righe...come faccio?

Chi mi aiuta?

Sub Form_Load()
ProgressBar1.Min = 0
ProgressBar1.Max = 0
End Sub

'sul click di un bottone chiamo una procedura
'che esegue un ciclo per popolare una griglia

Sub PopolaGriglia()
...
ProgressBar1.Value = 0

MIA PROCEDURA PER POPOLARE LA GRIGLIA

ProgressBar1.Value = ProgressBar1.Value + 1
Ovviamente il valore della progress bar dovrà fermarsi al valore MAX che come ripeto è variabile
...
End Sub

Attendo suggerimenti...
Grazie ;)

[wingman87]

Dove prendi gli elementi per popolare la griglia? Magari si può fare una stima