Visual Basic - Finally

7.3 Visual Basic - Finally

تُستخدم الكلمة Finally لتحديد كود يتم تنفيذه دائمًا سواء حدث استثناء أم لا، مثل غلق الملفات أو تحرير الموارد.

---

🔹 مثال على استخدام Finally

Try
    Dim x As Integer = 10
    Dim y As Integer = 0
    Dim result As Integer = x / y
Catch ex As DivideByZeroException
    Console.WriteLine("لا يمكن القسمة على صفر")
Finally
    Console.WriteLine("تم تنفيذ كتلة Finally")
End Try

✅ النتيجة:
لا يمكن القسمة على صفر
تم تنفيذ كتلة Finally

---

🔄 مثال بدون حدوث خطأ

Try
    Dim x As Integer = 10
    Dim y As Integer = 2
    Dim result As Integer = x / y
    Console.WriteLine("النتيجة: " & result)
Catch ex As Exception
    Console.WriteLine("حدث خطأ")
Finally
    Console.WriteLine("تم تنفيذ كتلة Finally")
End Try

✅ النتيجة:
النتيجة: 5
تم تنفيذ كتلة Finally

---

🧠 ملاحظات مهمة

• كتلة Finally تنفذ دائمًا حتى لو لم يحدث خطأ.
• مفيدة في غلق الملفات أو تحرير الموارد.
• لا يشترط كتابة Catch إذا كان لديك Finally، ولكن يُفضل وجودها لمعالجة الأخطاء.