Функция DoEvents

Важно : Тази статия е преведена машинно – вижте отказа от отговорност. Английската версия на тази статия за справка можете да намерите тук .

Забележка : Функция, метод, обект или свойство, описани в тази тема е забранено, ако Microsoft Jet Expression Service се изпълнява в ограничителен режим, който не позволява на оценката на потенциално опасни изрази. За повече информация за ограничителен режим потърсете "ограничителен режим" в "Помощ".

Добивите изпълнение, така че операционната система може да обработва други събития.

Синтаксис

DoEvents ( )

Забележки

Функция DoEvents връща число, показващо броя на отваряне на формуляри в самостоятелна версии на Microsoft Visual Basic, като например Visual Basic, Специалист издание. DoEvents връща нула във всички други приложения.

DoEvents подава контрола на операционната система. Връща се контрола, след като операционната система е готово за обработка на събития в своята опашка и всички ключове на SendKeys опашката са изпратени.

DoEvents е най-полезна за прости неща като позволява на потребителя да отмените процеса, след като го е започнал, например търсене на файл. За дълго време процеси получаване на процесора е по-лесно, като използвате таймер или делегиране на задача на ActiveX EXE компонент. В този случай задачата да продължите напълно независимо от вашето приложение и операционната система се грижат за мултитаскинг и време нарязване.

Всеки път, временно доходност до процесор в рамките на процедура за събитие, уверете се, че процедура не се изпълнява отново от друга част от вашия код преди първото повикване връща; Това може да доведе до непредвидими резултати. Освен това, не използвайте DoEvents , ако други приложения да евентуално взаимодействат с вашата процедура непредвидени начини по време на време, които имат натрупани контрол.

Пример

Забележка : Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример използва функцията DoEvents предизвиква изпълнение доведат до операционната система веднъж на всеки 1000 повторения на ставащото. DoEvents връща броя на отворените формуляри на Visual Basic, но само когато хост приложение е Visual Basic.

' Create a variable to hold number of 
' Visual Basic forms loaded and visible.
Dim I, OpenForms
For I = 1 To 150000 ' Start loop.
If I Mod 1000 = 0 Then ' If loop has repeated
' 1000 times.
OpenForms = DoEvents ' Yield to operating system.
End If
Next I ' Increment loop counter.

Забележка : Отказ от отговорност за машинен превод: Тази статия е преведена от компютърна система без човешка намеса. Microsoft предлага тези машинни преводи, за да помогне на потребителите, които не говорят английски, да се възползват от съдържанието за продукти, услуги и технологии на Microsoft. Тъй като статията е преведена машинно, е възможно да съдържа грешки в речника, синтаксиса и граматиката.

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×