Model/MONEYTABLE.vb

这里只显示每个文件的开头 60 行。登录后可以解锁完整代码。

微信扫码关注公众号，代码整理好后第一时间通知你。

Public Class MONEYTABLE
    Private _MoneyId As String          'id
    Private _TotalMoney As Double      '现有金额
    Private _PrecastMoney As Double    '预支金额
    Private _DealDatetime As DateTime   '时间
    Private _StandbyMoney As Double '备用金额
    Private _UseMoney As Double '用去金额
    Private _Creater As String
    Private _Createdate As DateTime
    Private _Modify As String
    Private _modifydate As DateTime

    Public Property MoneyId() As String
        Get
            Return _MoneyId
        End Get
        Set(ByVal value As String)
            _MoneyId = value
        End Set
    End Property


    Public Property TotalMoney() As Double
        Get
            Return _TotalMoney
        End Get
        Set(ByVal value As Double)
            _TotalMoney = value
        End Set
    End Property

    Public Property PrecastMoney() As Double
        Get
            Return _PrecastMoney
        End Get
        Set(ByVal value As Double)
            _PrecastMoney = value
        End Set
    End Property


    Public Property DealDatetime() As DateTime
        Get
            Return _DealDatetime
        End Get
        Set(ByVal value As DateTime)
            _DealDatetime = value
        End Set
    End Property
    Public Property StandbyMoney() As Double
        Get
            Return _StandbyMoney
        End Get
        Set(ByVal value As Double)
            _StandbyMoney = value
        End Set
    End Property
    Public Property UseMoney() As Double
        Get
            Return _UseMoney