今天手贱从2019升级到2020开发版,原来有个代码是新增一行,然后倒序排列(即最新添加的项位于最上面),用了2020后,新增完一行后,新增行会以肉眼可见的速度从最后一行往上跑,四五千条的记录要跑十几秒。19版是没有问题的。然后想降级到19版打开,发现19版已经无法打开这个文件了。附上代码
Functions.Execute("AddNewID","采购单","采购单号","CG")
Tables("采购单").Current("采购人") = User.Name
Tables("采购单").Current("采购日期") = Date.Today
Tables("采购单").Sort = "采购单号 DESC"
Tables("采购单查询_Table1").Sort = "采购单号 DESC"
Tables("采购单").Position= 0 '定位到首行
Vars("GLOBAL_CG_EditMode") = True
Vars("GLOBAL_CG_NEW_MARK") = True
forms("采购单编辑").open()