حول Exception

هذه فكرة عامة لعمل Exceptions

فى Module نكتب الكود التالى

    Public Sub UnhandledExceptionHandler()
        MsgBox("An error occurred. Error Number: " & Err.Number & _
        " Description: " & Err.Description & " Source: " & Err.Source)
    End Sub

ويتم استدعاء بطريقو العادية هكذا فى الفورم مثلا

 Catch ex As Exception
            UnhandledExceptionHandler()
        End Try

لا اعلم هل هذا ما تريدة ام لا فقط احاول المساعدة بالتوفيق ,,,,,

شكرا لك اخي الفاضل لكن للأسف هذا ما لا اقصدة .

أنت عند استخدام الأستثناء الذي سيقوم بمعالجة الخطأ الذي حدث لك الأن قمت بالستخدام Catch ex As Exception أنا اريد ان استخدم فئة خاصة بي .

كما في هذا :

Catch ex As SqlException

حيث ان المفسر سيقوم بالبحث فقط في SqlException عن الأخطأ وما نوعها التي حصلت الأن انا اريد ان ابني Exception خاي بي اسمه ما اريد . وفيه رسائل عديدة سوف اقوم بمعالجتها عن طريق Throw Exception

جرب اكتب

try

throw new exception("Helloooo")

Catch ex As Exception

msgbox("ex.message")

end ty

السلام عليكم

اذا كنت تنوى انشاء فئة للاستثناءات خاصة بك تستخدمها مع فئاتك الخاصة فاجعلها ترث من الفئة System.ApplicationException

Public Class MyException
Inherits System.ApplicationException
‘ No parameters. Use a default message.
Public Sub New()
MyBase.New(“My Message”)
End Sub
‘ Set the message.
Public Sub New(ByVal new_message As String)
MyBase.New(new_message)
End Sub
‘ Set the message and inner exception.
Public Sub New(ByVal new_message As String, ByVal inner_exception As Exception)
MyBase.New(new_message, inner_exception)
End Sub
End Class

ويمكنك الان استخدامها من خلال فئاتك الخاصة

.....
Throw New MyException(“Message OF Exception.”)
.....

Try
...
Catch ex As MyNameSpace.MyException
Console.Writeline(ex.Message)
End Try

السلام عليكم جميل جداااااااا

لقد فهمت وجهة نظرك اخى فواز

وشكرا اخى SOLO.NET

أخي وعزيزي SOLO.NET

أشكرك من اعماق قلبي شكرا كثير أولا لفهمك سؤالي . والثاني لوضع الحل . بارك الله فيك .

كذلك اشكر الأخ Romantic_touch على التفاعل وكذلك كفاح .

:rolleyes: