business.format

来自「客户关系管理系统ASP.NET+VB.NET编程完整程序！」· FORMAT 代码 · 共 29 行

Imports System
Imports System.Data
Imports OrmLib

Namespace {0}

    <Serializable()> Public MustInherit Class Business : Inherits BusinessBase

        Protected Sub New(ByVal dataContext As DataManager)
            Me.DataContext = dataContext
            Me.DataSet = dataContext.DataSet
        End Sub


        Friend DataContext As DataManager
        Protected DataSet As DataSet
        Protected Relations As DataRelationCollection

        Friend Property row() As DataRow
            Get
                Return Me.dataRow
            End Get
            Set(ByVal Value As DataRow)
                Me.dataRow = Value
            End Set
        End Property

    End Class
End Namespace