ar110.vb

通用进销存-visual basic编写

Public Class fmAR110
    Inherits Kings.fmSingle
    '定义主档的BindingManagerBase
    Dim BmAccountReceivableMaster As BindingManagerBase
    '定义明细档的BindingManagerBase
    Dim BmAccountReceivableDetail As BindingManagerBase
    '建立DataTable对象, 我们要利用它的ColumnChanged事件
    '来计算金额
    'AccountReceivableMaster
    Dim WithEvents dtAccountReceivableMaster As New DataTable()
    'AccountReceivableDetails
    Dim WithEvents dtAccountReceivableDetail As New DataTable()
    '是否要计算金额的旗标
    '主檔
    Dim AccountReceivableMasterHasChange As Boolean
    '明细档
    Dim AccountReceivableDetailHasChange As Boolean


#Region " Windows Form 砞璸