[اسامه الهرماوي]

السلام عليكم...
-حسب تحميل الداتا جريد فيو.
تفضلي:

كود :

   ProgressBar1.Maximum = datagridview1.RowCount - 0 'Set Max Lenght
       ProgressBar1.Step = 1
       ProgressBar1.Value = 0

       For line As Integer = 0 To datagridview1.RowCount - 0
           ProgressBar1.Value = line

       Next

أما بقيت الأزرار أستخدم معها هذا الكود:

كود :

    ProgressBar1.Value = 0
       For I As Integer = 0 To 59

           ProgressBar1.PerformStep()

           Application.DoEvents()

           System.Threading.Thread.Sleep(10)
       Next