[asmarsou]

وعليكم السلام و رحمة الله و بركاته
 تفضل

PHP كود :

Public Class Form1

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

        Select Case TextBox1.BackColor
            Case Color.Blue
                TextBox1.BackColor = Color.Black
            Case Color.Black
                TextBox1.BackColor = Color.Red
            Case Color.Red
                TextBox1.BackColor = Color.Blue
        End Select

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.BackColor = Color.Black
        Timer1.Interval = 200
        Timer1.Start()
    End Sub
End Class