调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm
If Syscmd.Project.Update(False,True) = False Then '如果没有升级
msgbox(0)
DataTables("合同管理").DataCols("起始日").RaiseDataColChanged()
msgbox(1)
DataTables("合同管理").DataCols("收租方式").RaiseDataColChanged()
msgbox(2)
DataTables("BQKP归档").DataCols("本期累计欠款").RaiseDataColChanged()
msgbox(3)
DataTables("房产信息").DataCols("具体位置").RaiseDataColChanged()
msgbox(4)
DataTables("本期开piao").DataCols("具体位置").RaiseDataColChanged()
msgbox(5)
RibbonTabs.AllowMinimize = True
'Syscmd.Project.Update(False,True) '这里i纯属多余
msgbox(3)出不来，说明DataTables("BQKP归档")的DataColChanged事件有问题，具体按照调试技巧自己跟踪
加好友 
发短信
Post By：2016/9/18 12:09:00 [显示全部帖子]
