state.vb

来自「使用Access数据库演示的任务分配管理程序 一个使用ADO.NET基于」· VB 代码 · 共 58 行

'------------------------------------------------------------------------------
' <auto-generated>
'     This code was generated by a tool.
'     Runtime Version:2.0.50727.42
'
'     Changes to this file may cause incorrect behavior and will be lost if
'     the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On

Imports System

'*************************************************************
' Class Name:  State
' Purpose:  Encapsulates datacolumn names
' Description: 
'***************************************************************
Namespace Database.Columns
    
    Public Class State
        
        Shared m_StateIDColumn As String = "[StateID]"
        
        Shared m_StateID As String = "StateID"
        
        Shared m_TextColumn As String = "[Text]"
        
        Shared m_Text As String = "Text"
        
        Shared ReadOnly Property StateIDColumn() As String
            Get
                Return m_StateIDColumn
            End Get
        End Property
        
        Shared ReadOnly Property StateID() As String
            Get
                Return m_StateID
            End Get
        End Property
        
        Shared ReadOnly Property TextColumn() As String
            Get
                Return m_TextColumn
            End Get
        End Property
        
        Shared ReadOnly Property Text() As String
            Get
                Return m_Text
            End Get
        End Property
    End Class
End Namespace