codedescription.vb

vb.net写的图书管理系统,功能完备,能正常使用,可用于二次开发.

Public Class codeDescription
    '代码值
    Dim CodeID As String
    '代码内容
    Dim CodeExp As String
    '设置代码值
    Public Function setCodeID(ByVal ID As String)
        Me.CodeID = ID
    End Function
    '获取代码值
    Public Function getCodeID() As String
        Return CodeID
    End Function
    '设置代码内容
    Public Function setCodeExp(ByVal exp As String)
        Me.CodeExp = exp
    End Function
    '获取代码内容
    Public Function getCodeExp() As String
        Return CodeExp
    End Function
End Class