[senior]

و الآن ننشئ فئة أرقام الاتصال كالتالي :

[ATTACH=CONFIG]503[/ATTACH]

[ATTACH=CONFIG]504[/ATTACH]

ثم نكتب الكود التالي :

ننشئ تركيبه اسمها نوع الاتصال :

PHP كود :

Public Class ContactNumber

    Enum CallType
        Tel = 1
        Mobil = 2
        Fax = 3
    End Enum 


ثم نعلن عن المتغيرات المحلية :

PHP كود :

#Region "Private Variables"
    Private _ID As Integer = 0
    Private _PersonID As Integer = 0
    Private _Type As CallType = CallType.Mobil
    Private _Number As String = ""
#End Region 


ثم الخصائص

PHP كود :

#Region "Properties"
    Property ID() As Integer
        Get
            Return _ID
        End Get
        Set(ByVal value As Integer)
            _ID = value
        End Set
    End Property
    Property PersonID() As Integer
        Get
            Return _PersonID
        End Get
        Set(ByVal value As Integer)
            _PersonID = value
        End Set
    End Property
    Property Type() As CallType
        Get
            Return _Type
        End Get
        Set(ByVal value As CallType)
            _Type = value
        End Set
    End Property
    Property Number() As String
        Get
            Return _Number
        End Get
        Set(ByVal value As String)
            _Number = value
        End Set
    End Property
#End Region 


فالإجراء المشيد للفئة :

PHP كود :

#Region "Public Functions"

    Function Save() As Integer

    End Function

    Function Update() As Integer

    End Function

    Function Delete() As Integer

    End Function

#End Region

End Class 


بهذا نكون قد انتهينا من كتابة الكائنات .