Progress Bar

[ErCaZa]

No se si por ejemplo quieres mostrar los datos de una tabla lo que puedes hacer es primero contar cuantos items hay y luego si cargar los resultados creo que con while, puedes ir añadiendo al progress bar1

Ejemplo:
progressbar1.maximum = resultadoSQL.fieldcount

While ResultadoSQL.Read
progressbar1.value = progressbar1.value + 1
' y aqui vas agregando los datos al datagrid
next i
end while

si ves que no se te pone al 100% en resultadoSQL.fieldcount ponle un - 1
No se si funcionara pero es lo unico que se me ha ocurrido y no lo he probado :P