[ابو ليلى]

السلام عليكم و رحمة الله و بركاته
بالاضافة لحل الاخ aljzazy
يمكنك عملها وفق تقنية Async كما يلي:

PHP كود :

   Private Async Function ChangeColor(Perod As Integer, Lb As Label) As Task
        Dim Coloor As New List(Of Color) From
            {Color.Red, Color.Green, Color.Yellow, Color.Blue, Color.Purple, Color.Black}

        For Each itm In Coloor
            Lb.ForeColor = itm
            Await Task.Delay(Perod)
        Next

    End Function 


الاستدعاء

PHP كود :

   Private Async Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Await ChangeColor(1700, Label1)
    End Sub