listbox的抖动问题,求解 本帖最后由 nmwwf 于 2010-01-05 22:40:17 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 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 “另:如果有大量的数据要更新,timer延迟太厉害了,有解决的方法吗?”大数据量,用list会有这个问题,用别的控件也会有这个问题,好像没有好办法 大量的数据 (当然不是大大没道理的情况) 只要你不使用它的 List1.listcount 自己弄个变量来统计, 而且只是为了察看数据不点击的话(点击也没用),List1太好用了.我曾用它来接收串口, 连续几十万笔, 只用来观查数据, 其它一点用途都没有. 补充重点List1的特性大量数据要读入时 在开始时要将它的 visible设为 False 读完后再 True那速度可是天差地远 谢谢Cbm666大哥,明天给分(好久没来,找不到给分的链接)你的方法挺好使的,不过我的for循环中有一定量代码,简单的说我设置了几个时间,listbox中的各行如果满足会有不同提示音,会显示不同的颜色等等还有其它的一些代码,如果listbox中行超过300行时,会有明显的闪烁感,应该是lsitbox隐藏然后再显示产生的。 支持行列拖动、换肤的表格控件? 大家测试一个有趣的现象,double型反而没有single型精确??? 提取链接 ASP用responsible。write如何换行? 如何自动提交文本框的内容? DBGrid 万年历奖100分 如何实现treeview节点间的拖放 急急急!!为什么我调用函数将16进制转换成二进制总是数不对!!! 如何比较日期 VB报表打印汇总数据 VB如何打开一个新窗口并传递参数过去
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