progressbar dan sonra otomatik olarak başka form açamıyorum yardım

yapmaya çalıştığım çalıştığım yerde kullanmak üzere araç görev emri kayıt defteri hazırlamak.İlk form AÇILIŞ.AÇILIŞ'ın sol alt köşesindeki resme tıklayınca progressbar çalışıyor.Ancak Progressbar tamamlanınca ilk formun kapanarak ikinci form olan ARAÇ GÖREV KAYIT formunun açılmasını istiyorum ama ben beceremedim.Yardım ederseniz sevinirim.

Private Sub Resim44_Click()

ProgressBar1.Visible = True

 For I = 1 To 10000



 ProgressBar1.Value = (I / 10000) * 100



 Next I

ProgressBar1.Visible = False

Docmd.openform "açılacak formun adı"

End Sub

tamam verdiğiniz kodları yazdıktan sonra sorunu çözdüm çok teşekkür ederim elinize bilgilerinize sağlık

progressbar dan sonra otomatik olarak başka form açamıyorum yardım

pmfatih77

Yandemir

pmfatih77