examinfo.vb

来自「系统概要: 本系统采用VB.NET开发. 开发平台:Windows XP P」· VB 代码 · 共 95 行

'
'    Copyright(C)2006,济南大学材料科学与工程学院
'    All right reserved.
'
'    文件名称:考试信息
'    文件标识:
'    摘    要:
'
'    当前版本:1.0.0
'    作    者:梁  海
'    完成日期:2006-11-29
'
'    取代版本:
'    原作者  :
'    完成日期:
'
'    修改历史:
'
Public Class ExamInfo

    Private _EID As Integer             '考场编号
    Private _SID As String              '考生考号
    Private _StartDateTime As DateTime  '考试开始时间
    Private _EndDateTime As DateTime    '考试结束时间
    Private _IsExamed As Boolean        '是否已经参加考试

    '
    '    属性名称:EID() As Integer
    '    摘    要:获取/设置考场编号
    ' 
    Public Property EID() As Integer
        Get
            Return _EID
        End Get
        Set(ByVal Value As Integer)
            _EID = Value
        End Set
    End Property

    '
    '    属性名称:SID() As String
    '    摘    要:获取/设置考生考号
    ' 
    Public Property SID() As String
        Get
            Return _SID
        End Get
        Set(ByVal Value As String)
            _SID = Value
        End Set
    End Property

    '
    '    属性名称:StartDateTime() As DateTime
    '    摘    要:获取/设置考试开始时间
    ' 
    Public Property StartDateTime() As DateTime
        Get
            Return _StartDateTime
        End Get
        Set(ByVal Value As DateTime)
            _StartDateTime = Value
        End Set
    End Property

    '
    '    属性名称:EndDateTime() As DateTime
    '    摘    要:获取/设置考试结束时间
    ' 
    Public Property EndDateTime() As DateTime
        Get
            Return _EndDateTime
        End Get
        Set(ByVal Value As DateTime)
            _EndDateTime = Value
        End Set
    End Property


    '
    '    属性名称:EndDateTime() As DateTime
    '    摘    要:获取/设置考生是否已经参加考试
    ' 
    Public Property IsExamed() As Boolean
        Get
            Return _IsExamed
        End Get
        Set(ByVal Value As Boolean)
            _IsExamed = Value
        End Set
    End Property

End Class