timebillingapp.vbw

VB中实现3层结构的完整教学示例（很难得的）

Global = 0, 0, 0, 0, C
frmMain = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmSplash = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmAbout = 0, 0, 0, 0, C, 0, 0, 0, 0, C
DataEditGrid = 0, 0, 0, 0, C, 0, 0, 0, 0, C
CaptionBar = 0, 0, 0, 0, C, 0, 0, 0, 0, C
MenuTree = 0, 0, 0, 0, C, 0, 0, 0, 0, C
CProgBar32 = 0, 0, 0, 0, C
iForm = 0, 0, 0, 0, C
cToolbar = 0, 0, 0, 0, C
cFindSubTools = 0, 0, 0, 0, C
cFindSubTool = 0, 0, 0, 0, C
cMemDC = 0, 0, 0, 0, C
frmFind = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmWorkCode = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmWorkCodeList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmPaymentMethod = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmPaymentMethodList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmExpenseCode = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmExpenseCodeList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmClient = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmClientList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmEmployee = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmEmployeeList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmClientProject = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmClientProjectList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCard = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCardList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmProjTimeCardExpense = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmProjTimeCardExpenseList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmProjTimeCardHour = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmProjTimeCardHourList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmPayment = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmPaymentList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCardExpense = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCardExpenseList = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCardHour = 0, 0, 0, 0, C, 0, 0, 0, 0, C
frmTimeCardHourList = 0, 0, 0, 0, C, 0, 0, 0, 0, C