vb编程长循环怎么既避免死机，又可以加快速度

[busanbusi]

我有个很长的几个for语句嵌套，需要运行很长是时间，如果循环中用doevents，则只该进程只占系统cpu13%,速度比较慢，如果不用doevents,就cpu100%，怎么才能让cpu保持在70%到80%，这样既可以加快速度，也不会让系统死机

[milaoshu1020]

dim count as long
count = 0

for  ...
    ...
    count = count + 1
    if count mod 1000 = 0 then ' 视情况设置
        doevents
    end if
next

。

[熊孩子开学喽]

如果是嵌套的for, 一来看看代码是否可以优化, 能放到循环外处理的东西决不在循环内处理. 这个具体代码具体分析了, 有时候甚至会涉及到算法上的根本性变动. 另外可以把doevents放在外层嵌套.

[贝隆]

DOEVENTS的作用是响应Windows其它任务要求，如果其它任务多，那么循环就会慢，如果少，就会快。