classes/ClsTDepartment.vb

微信扫码关注公众号，代码整理好后第一时间通知你。

Public Class ClsTDepartment
    'T_Department

    Private m_DepartmentId As Integer '0
    Private m_DepartmentCode As String '1
    Private m_DepartmentName As String '2

    Public Property DepartmentId As Integer
        Get
            Return m_DepartmentId
        End Get
        Set(value As Integer)
            m_DepartmentId = value
        End Set
    End Property

    Public Property DepartmentCode As String
        Get
            Return m_DepartmentCode
        End Get
        Set(value As String)
            m_DepartmentCode = value
        End Set
    End Property

    Public Property DepartmentName As String
        Get
            Return m_DepartmentName
        End Get
        Set(value As String)
            m_DepartmentName = value
        End Set
    End Property
End Class