everydepartment.vb

是一个用SQL和VB.NET来做的源码。

Public Class EveryDepartment
    Private strDepartmentName As String

    Public Sub New(ByVal strDepartmentName As String)
        MyBase.New()
        Me.strDepartmentName = strDepartmentName
    End Sub

    Public ReadOnly Property DepartmentName() As String
        Get
            Return strDepartmentName
        End Get
    End Property

End Class