RE:Un progressbar sobre una base de datos
Si te refieres a una barra de progreso que vaya aumentando y que finalice cuando haya terminado de cargar una base de datos, una forma posible es , obtener el numero de registros que hay en la tabla que se va a cargar , con la propiedad "Recordcount"
Ejemplo:
total_registros = rstable.recordcount
progressbar1.maxvalue=total_registros
progressbar1.value=0
progressbar1.visible=true
valor=0
while not rstable.eof
............
valor=valor + 1
progressbar1.value = valor
rstable.movenext
wend
progressbar1.visible=false