主题：[求助] 这断代码运行速度怎么提高 『搞定，摆个擂台啦』

 这个……楼主，你这段代码想实现什么呢？要从源头入手。

满足什么条件的做标记？

如果是这样的条件的话，用连接查询吧。连成一张表比较好操作。

cmd.commandText = "select distinct a._Identify from {xxx} a inner join {xxx} b on (a.借方金额 = b.贷方金额 or a.贷方金额 = b.借方金额)"
dim dt as datatable = dt.exec
dim idxs as string = ""
for each dr as datarow in dt
    idxs &= dr("_Identify") & ","
next
datatables("xxx").replacefor("_Identify in (" & idxs.TrimEnd(",") & ")")

这样比较好。

有木有具体的数据可以测试？楼主？弄上来看看。

 楼主，你这个东西真的要考验算法哦。因为要统计金额的累计，多少行都是不确定的，这样比较计算起来，一定会很慢的。正在想办法……我先忙其它的了。

 终于是弄好了。用sql语句直接在后台弄，然后再加载到foxtable里，只做了第一种情况，第二种要组合累加行的比较麻烦，楼主先自己想想办法。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.zip

加一个条件吧，限制一下重复就行了。

 别沉了……发觉使用find直接查询修改也不会太慢，改了一下，第一种情况的。弄好第一种情况，第二种情况就比较好弄了。

 代码还有优化的余地。楼主加油。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.zip

sql语句只是一个过渡，用来得到处理的数据。你把sql语句放到命令窗口里执行，看看最后得到的表，根据这个表处理数据比在原先的那个表处理要快或者好得多，这个是思路。

你可以这样试一下。比如你这样想，我要处理这些问题，我得到哪个临时的表可以帮助自己减少查询的次数等等。