Imports Microsoft.VisualBasic

Public Class Student
    Private _studentName As String
    Private _studentAge As Integer
    Private _studentCourse As String
    Private _id As Integer


    ' This is required when we set the DataObjectTypeName attribute
    ' in the ObjectDataSource
    '
    Public Sub New()

    End Sub

    Public Sub New(ByVal theName As String, ByVal theAge As Integer, ByVal theCourse As String)
        _studentName = theName
        _studentAge = theAge
        _studentCourse = theCourse
    End Sub

    Public Property Key() As String
        Get
            Return _studentName
        End Get
        Set(ByVal theKey As String)
            _studentName = theKey
        End Set
    End Property

    Public Property Name() As String
        Get
            Return _studentName
        End Get
        Set(ByVal theName As String)
            _studentName = theName
        End Set
    End Property

    Public Property Age() As Integer
        Get
            Return _studentAge
        End Get
        Set(ByVal theAge As Integer)
            _studentAge = theAge
        End Set
    End Property

    Public Property Course() As String
        Get
            Return _studentCourse
        End Get
        Set(ByVal theCourse As String)
            _studentCourse = theCourse
        End Set
    End Property

    Public Property Id() As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

End Class