اطلب مساعدة فى هذا الكود ....من فضلكم

بصوا يا مبرمجى العرب

كل الى انا عايزة هو الاتى:

من الساعة 10:30 صباحا الى الساعة 2:30 ظهرا يكتب فى تكيست بوكس كلمة "مفتوح"

و من الساعة 2:30 ظهرا الى الساعة 2:45 ظهرا يكتب فى تكيست بوكس كلمة "مغلق"

و من الساعة 2:45 ظهرا الى الساعة 3:15 ظهرا يكتب فى تكيست بوكس كلمة "مفتوح"

و من الساعة 3:15 ظهرا الى الساعة 10:30 صباحا يكتب فى تكيست بوكس كلمة "مغلق"

ودة مواعيد فتح وغلق جلسات البورصة المصرية

الكود الى انا كتبتة هو:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Label1.Text = TimeValue(TimeOfDay)
        Label2.Text = Date.Today

        If Label1.Text >= TimeValue("10:30:00 AM") Then
            Label3.Text = "مفتوح"
            Label3.ForeColor = Color.Green
            Label4.Text = ("داخل المقصورة")
            Label4.ForeColor = Color.Green

        ElseIf Label1.Text >= TimeValue("02:30:00 PM") Then
            Label3.Text = "مغلق"
            Label3.ForeColor = Color.Red
            Label4.Text = ""

        End If

        If Label1.Text >= "02:45:00 PM" Then
            Label3.Text = "مفتوح"
            Label3.ForeColor = Color.Green
            Label4.Text = "خارج المقصورة"
            Label4.ForeColor = Color.Green

        ElseIf Label1.Text >= "03:15:00 PM" Then
            Label3.Text = "مغلق"
            Label3.ForeColor = Color.Red
            Label4.Text = ""

        End If

    End Sub
End Class

بس مش عارف الخظا فين

لذا ارجو المساعدة