vb程式執行時很卡出現無響應,怎麼辦

時間 2022-02-01 19:44:02

1樓:匿名使用者

我以前也碰到過類似問題,我用乙個笨方法:在耗時較大的迴圈中加入for i = 1 to 1000 '適當調整to後的值,即是交出足夠的時間給系統做出反應。不過會影響到程式執行的速度。

doevents

next

2樓:

這裡不需要sleep,在迴圈中加入doevents就好了。若沒有新增doevents,執行時就會出現無響應的狀態,如果要此時要退出執行,按ctrl+break

補充:不知道你的語句是怎樣的,一般來說,如果是巢狀的迴圈,則只需要在內部的迴圈中新增doevents就可以了,但是如果巢狀的內迴圈是選擇性的迴圈,則在外迴圈裡也新增乙個比較好。

例如:for i=1 to 100000

for j=1 to 1000000

....

doevents

next

next

這裡因為內迴圈不是選擇性的,所以新增乙個doevents即可;

又例如:

for i=1 to 100000

do while i>50000

....

doevents

loop

doevents

next

因為這裡內迴圈是根據條件是否滿足而執行的,因此為了避免出現資源佔用率較高的情況,則在兩個迴圈中都新增為宜。

這裡怎麼用doevents要看你的語句而定。

個人見解,拋磚引玉,僅供參考~~~

3樓:匿名使用者

多些 doevents

少些 sleep

就好了!

4樓:

頂~~~big_bubby

VB小程式,執行時報「3704」錯誤,提示「物件關閉時,不允許操作」怎麼解決

樓上講的dll不能開啟,不對 為保密起見,資料庫檔案可用任意符合規範的字元作副檔名,當然包括dll後面幾句這樣改下就行了 mycon.open mystr ssql select from fundcode where pwd passwd.text myrt.open ssql,mycon,1,3...

VBA程式執行時出現事實錯誤424要求物件是怎麼回事

名臣 ubound arr,2 d arr 0,y 這兩個好象有問題,沒見過這麼寫的 合併成一個巨集試試 sub 生成下拉 dim sr as string dim data as new 執行 dim sql as string dim arr,y dim d as new dictionary ...

伺服電機執行時抖動,伺服電機執行時出現強烈震動,是什麼原因導致的?

hi漫海 伺服電機抖動原因進行的分析 觀點一 當伺服電機在零速時發生抖動,應該是增益設高了,可減小增益值。如果啟動時抖動一下即報警停車了,最大可能是電機相序不正確。觀點二 1 pid增益調節過大的時候,容易引起電機抖動,特別是加上d後,尤其嚴重,所以盡量加大p,減少i,最好不要加d。2 編碼器接線接...