Есть ли альтернатива DoEvents? - VB

Узнай цену своей работы

Формулировка задачи:

Есть ли альтернатива DoEvents?
Если да, то какая и как ее можно использовать? Хотя бы пример.

Решение задачи: «Есть ли альтернатива DoEvents?»

textual
Листинг программы 
Sub test()
Const N = 3000000
Dim t!, i&
t = Timer
For i = 1 To N
    DoEvents
Next
Debug.Print "DoEvents", Timer - t
t = Timer
For i = 1 To N
    API_DoEvents
Next
Debug.Print "API_DoEvents", Timer - t
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4 из 5
Похожие ответы