以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何实现高铁速度  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90409)

--  作者:hbhb
--  发布时间:2016/9/12 10:48:00
--  如何实现高铁速度
蓝导:access外部数据源的下列代码 总共增加504行竟然要用5秒,破自行车的速度,如何提高?
For Each ary As String() In lstsz
    For Each km As String In bbkm
        Dim tr As Row = tb3.Table.AddNew
        tr("dtwlmxb1") = ary(0)
        tr("dtwlmxb2") = ary(0) & "--" & ary(1)
        tr("dtwlmxb3") = km
    Next
Next


--  作者:有点蓝
--  发布时间:2016/9/12 11:24:00
--  
看不到具体问题

参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52855
--  作者:狐狸爸爸
--  发布时间:2016/9/12 11:40:00
--  

批量增加行,注意:

http://www.foxtable.com/webhelp/scr/0453.htm

 


--  作者:有点蓝
--  发布时间:2016/9/12 12:04:00
--  
如果会触发表事件,http://www.foxtable.com/webhelp/scr/2218.htm

如果是表达式列计算影响:http://www.foxtable.com/webhelp/scr/1935.htm

--  作者:hbhb
--  发布时间:2016/9/12 12:09:00
--  
就以上的代码呀,循环增加行,填写三列的数据。access外部数据源. 就是下面的代码也要2秒,如何优化速度?
for n as integer = 0 to 50 
   for t as integer = 1 to 8
    Dim tr As Row = tb3.Table.AddNew
  next
next

--  作者:有点蓝
--  发布时间:2016/9/12 12:17:00
--  
看2楼
--  作者:hbhb
--  发布时间:2016/9/12 12:22:00
--  
谢谢!改用事务快多了。一秒不到。
--  作者:blackzhu
--  发布时间:2016/9/12 12:37:00
--  
 两层遍历?