[ابراهيم ايبو]

السلام عليكم اخي الكريم
سنغير طريقة العرض الى جملة فور عادية ثم نتحقق من ان الرقم (i) اصبح بطول المصفوفة
وهذا يعني لم يبق عناصر للعرض عندها ستعرض الرسالة بانتهاء عرض العناصر

كود :

For i As Integer = 0 To SevenDay.Length - 1
           MsgBox(SevenDay(i))
           If i = SevenDay.Length - 1 Then
               MsgBox("تم الانتهاء")
           End If
       Next