有个奇怪的问题请教一下各位老师:在一张表中新添加行,然后给此行的A,B,C,D列赋值,最后保存此行
A,B,D列赋值都没有问题,但是每当给C列赋值的时候速度就会变慢很多(用户无法接受的速度呐!)
以下是我的代码,目测跟官方说明书中添加数据代码无差别
Dim NewRow As Row =Tables("二拆合同产值明细表").AddNew()
NewRow("父ID")=r("二拆合同ID")
NewRow("所属期间")=r("所属期间")
NewRow("开发项目")=r("开发项目")
NewRow("开发产品")=r("开发产品")
NewRow("合同名称")=r("合同名称")
NewRow("乙方")=r("乙方")
NewRow("挂靠单位")=r("挂靠单位")
' NewRow("所属楼栋")=r("所属楼栋")
NewRow("形象进度")=r("形象进度")
NewRow("本月付款比例")=r("本月付款比例")
NewRow("申报产值")=r("申报产值")
NewRow("备注")=r("备注")
因为模块太大了,所以无法上传附件,添加数据的方法测试没有问题,问题在于赋值的时候速度变慢,r("所属楼栋")获取的速度也非常快(已测试)
最后需要补充说明一下:原来 “所属楼栋” 这个字段的长度是16,在表中有数据的情况下我把它的长度改成30了(这是我最怀疑的地方,不知道是不是导致数据赋值变慢的原因)
还望有碰到类似情况或者知道解决方案的老师指点一下,谢谢了!
[此贴子已经被作者于2015/7/15 12:55:08编辑过]