السلام عليكم ورحمة الله وبركاته
الدالة Format تقوم بالعديد من المهام ويمكنك ببساطة استخدامها لكي تتحقق من قيمة اليوم هل هو اكبر 5 كما تفضلت في سؤالك ام لا ، وعلى ضوء ذلك يمكن لبرنامجك اتخاذ القرار المناسب
المثال التالي سوف يفيد اجابة سؤالك.
If Format(Me.Text1, "DD") > 5 Then
Me.Text3 = "late"
End If