Visual Basic - EJEMPLO DE UNA PROGRESSBAR PORFAVOR!!!

HOLA
NO SE SI ALGUIEN ME PUEDA AYUDAR PORVARO CON UN EJEMPLO DE UNA PROGRESSBAR PARA PONERLOS CUANDO INGRESO DE UNA FORM A OTRA, COMO EN CADA FORMS TENGO CARGADOS VIDEOS E IMAGENES LA CARGA SE HACE LENTE Y QUISIERA PONER EN LO QUE SE CARGA UNA PROGRESSBAR O ALGO PARECIDO.
GRACIAS DE ANTEMANO

hola, en el form, coloca un control Progressbar... llamalo Barra

y en el form load()
barra.min = 0
barra.max = 10
carga imagen 1...
barra.value = 2

carga imagen 2
barra.value = 4

carga imagen 3
barra.value = 6
...
carga imagen 5
barra.value = 10

ojo, no le puedes dar un Value mas grande que el MAX, eso te dara un error...

Saludos
Gizkard

la variable workarea registra el tiempo de carga, puedes modificarla

Dim counter As Integer
Dim workarea(5000) As String
ProgressBar1.Min = LBound(workarea)
ProgressBar1.Max = UBound(workarea)
ProgressBar1.Visible = True
ProgressBar1.Value = ProgressBar1.Min
For counter = LBound(workarea) To UBound(workarea)
workarea(counter) = "valor inicial" & counter
ProgressBar1.Value = counter
Next counter

espero te sirva...