Gracias GeoAvila, ya yo había encontrado otra variante que es una chapucería, lo sé, pero me estaba funcionando hasta que... explico.
Había pasado el Timer y el ProgressBar a un form, llamémosle Form3
De forma que en Form1 hacía (al hacer click en el menú que llama a Form2):
Private sub mForm2_Click()
Form3.Show vbModal ' el que contiene el Timer y el ProgressBar
Form2.Show
Form2.Enabled = False
end sub
En Form3:
Private sub Form3_Load()
Timer1.Enabled = True
ProgressBar1.Value = 0
ProgressBar1.Visible = True
End Sub
Private sub Timer1_Timer()
ProgressBar1.Value = ProgressBar1.Value + 1
if ProgressBar1.Value >= 100 then
Timer1.Enabled = False
Unload Proyecto.Form3
Form2.Enabled = True
End If
End Sub
Ya sé que es una chapucería y un timo, pues en realidad el sistema no hace nada mientras muestra la barra, y eso puede durar más (o bastante más) que los procesos que se desarrollan por detrás, en Form2, pero eso sólo lo sé yo... bueno... y ahora tú...
