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隐藏然后再显示产生的。 向大家询问一个GetObject的效率问题 VB从Win2000迁移至WinXP后控件显示问题?郁闷之事 关于数据类型 采集VB6.0连接access2000的方法!! 如何将一个toolbar放到表单中 如何在同一文本框中显示不同颜色的字符? 一个关于TCP协议的问题,急! 问几个问题,先来先得分(二)。 这个枚举定义是怎么回事?? 工作站调用服务器上共享目录文档而不在工作站上留下痕迹(给38分) 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