ارجوكم محتاج حد يساعدنى بسرعه

ما تطلبه سهل للغاية ويمكن عمله بطرق مختلفة

قم بوضع Label على الـ Form واجعل خاصية الـ Caption له = 10

ثم قم بوضع Timer على الـ Form واجعل خاصية الـ Interval له = 1000

ثم ضع الكود التالي في حدث الـ Timer للـ Timer الذي وضعناه على النموذج

If Val(Label1.Caption) = 0 Then
Timer1.Enabled = False
Unload Me
Else
Label1.Caption = Val(Label1.Caption) - 1
End If

يمكنك إسراع العد وإبطاؤه من التغيير في خاصية الـ Interval للـ Timer

بالتوفيق

شكرا ليك اخ عبدالله

وجزاكم الله كل خير