[Anas Mahmoud]

او الافضل : استخدم         

كود :

    Await Task.Delay(500)

حتى لاتحبس المستخدم اثناء الانتظار ، ولكن اضف Async قبل Sub في تعريف الحدث :

كود :

   Private Async Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       For i As Integer = 1 To 5
           ListBox1.Items.Add(i)
           Await Task.Delay(500)
       Next
   End Sub

هكذا ننتظر دون استخدام تايمر ودون تعطيل باقي البرنامج