[silverlight]

أخي الفاضل الشاكي لله

اولا : أعلم جيدا الفارق بين Structure و Class و أفهم فكرة التوريث جيدا
لكن ...........................
مثلا الغالبية تقول ان Structure يتم استخدامه مع ValueTypes
لذلك ارجو منك ان تلقي نظرة علي الكود التالي
فهو يغير قليلا من المفاهيم الخاصة بكل من Structure و Class

و عفوا مرة ثانية لإستخدامي لغة الفيجوال بيسك دوت نت بدلا من #C

PHP كود :

Public Structure CairoString

    Private _value As String

    Public Sub New(value As String)
        Me._value = value
    End Sub

    Private Shared empty As CairoString = New CairoString(String.Empty)

    Public Shared ReadOnly Property IsEmpty() As CairoString
        Get
            Return empty
        End Get
    End Property

    Public Property Text() As String
        Get
            Return _value
        End Get
        Set(value As String)
            _value = value
        End Set
    End Property

    Public Shared Function IsNullOrEmpty(cs As CairoString) As Boolean
        Return cs.Text Is Nothing OrElse String.IsNullOrEmpty(cs.Text)
    End Function

    Public Shared Widening Operator CType(cs As CairoString) As String
        If cs.Text IsNot Nothing Then
            Return cs.Text
        End If
        Return Nothing
    End Operator

    Public Overrides Function Equals(obj As Object) As Boolean
        Dim s As String = TryCast(obj, String)
        If s IsNot Nothing Then
            Return s.Equals(Me.Text)
        End If
        Dim cs As CairoString = CType(obj, CairoString)
        Return cs.Text IsNot Nothing AndAlso cs.Text.Equals(Me.Text)
    End Function

    Public Overrides Function GetHashCode() As Integer
        If Me.Text IsNot Nothing Then
            Return Me.Text.GetHashCode()
        End If
        Return 0
    End Function

    Public Overrides Function ToString() As String
        Return Me.Text
    End Function

End Structure 


الإستخدام ........

PHP كود :

       Dim cs As New CairoString("VB4Arab")
        Me.Text = cs.Text


        Dim cs1 As CairoString = cs
        cs1.Text = "any String"
        Me.Text = cs1.Equals(cs) 


ما أريد ان أقوله أنه تقريبا لا يوجد فارق كبير بين كل من Structure و Class
الأمر فقط متروك للمبرمج الذي يكتب الكود
و في الكيفية التي سيستخدمها المبرمج لكتابة الكود و كتابة البيانات في كل من Structure و Class

و أخيرا هذا اثبات بسيط أن مايكروسوفت أحيانا ب تقول اي كلام في اي كلام
أليك هذه المعادلة العجيبة ........... او كما نقول في مصر إليك هذه الفزورة
String أصله Char و ........ Char أصله Structure


تقبل تحياتي ................ بالمناسبة اسمي : مهندس عمر