-- 作者:kaiyu
-- 发布时间:2015/12/8 10:20:00
-- [求助]如何动态执行代码
此主题相关图片如下:{234aa4de-2f91-423b-9860-3fc647ffd549}.bmp
For Each dr As Row In Tables("JX月绩效工作中心").Rows Dim code As String = dr("录入数据取数条件") Functions.add("sum",code) Functions.Complie() dr("得分") = Functions.Execute("sum") Functions.remove("sum") Next
我用动态函数加载,这代码执行效率比较低,有没有办法优法。可不可以自定义过程
|