كيفية ظهرو Progressbar1 واختفائة بعد تنفيذ حدث

أخي الكريم تأكد من وضع قيمة الخاصية visible على true

و قم بجعلها false بعد وضع كود الطباعة

progressbar1.visible = true
------------
أمر الطباعة + تقدم progressbar1
------------
progressbar1.visible = false

لو ترفق مثال يكون أحسن حتى يتمكن الأخوان من مساعدتك بشكل أكبر

تفضل هذا مثال اريد التعديل علية

New_Folder__2_.rar

أخي الكريم أعذرني على قلة درايتي بالـ VB

لكني أرغب في مساعدتك أنظر الكود المرفق لعله قد يفيدك

أعذرني مرة أخرى

Private Sub Command1_Click()
ProgressBar1.Visible = True
' حلقة عملية الطباعة لا أعرف ما هي في الفيجول
' while printing not stop
' أمر الطباعة
' printing
ProgressBar1.Value = ProgressBar1.Value + 1
'loop
ProgressBar1.Visible = False
End Sub

أرجو الفائدة