本帖最后由 nmwwf 于 2010-01-05 22:40:17 编辑

解决方案 »

  1.   

    For...Next 放在Timer事件? 除非你是每隔一段时间枚举你需要的 其它就没道理了Private Sub Timer1_Timer() 
       timer1.enabled=false
       list1.visible=false
        For i = 0 To 300 
            List1.List(i) = List1.List(i) + 1 
        Next i 
        timer1.enabled=true
        list1.visible=trueEnd Sub 
      

  2.   

    “另:如果有大量的数据要更新,timer延迟太厉害了,有解决的方法吗?”大数据量,用list会有这个问题,用别的控件也会有这个问题,好像没有好办法
      

  3.   

    大量的数据 (当然不是大大没道理的情况) 只要你不使用它的 List1.listcount 自己弄个变量来统计, 而且只是为了察看数据不点击的话(点击也没用),List1太好用了.我曾用它来接收串口, 连续几十万笔, 只用来观查数据, 其它一点用途都没有.
      

  4.   

    补充重点List1的特性大量数据要读入时 在开始时要将它的 visible设为 False 读完后再 True那速度可是天差地远
      

  5.   

    谢谢Cbm666大哥,明天给分(好久没来,找不到给分的链接)你的方法挺好使的,不过我的for循环中有一定量代码,简单的说我设置了几个时间,listbox中的各行如果满足会有不同提示音,会显示不同的颜色等等还有其它的一些代码,如果listbox中行超过300行时,会有明显的闪烁感,应该是lsitbox隐藏然后再显示产生的。