DoEvents функциясы

Ескерту : Егер Microsoft Jet Expression қауіптілігі ықтимал өрнектің есептелуіне жол бермейтін құмсалғыш режимінде іске қосылғанда, осы бөлімдегі функция, әдіс, нысан немесе сипат доғарылады. Құмсалғыш режимі туралы толық ақпарат алу үшін Анықтамадағы "құмсалғыш режимін" іздеңіз.

Операциялық жүйе басқа оқиғаларды өңдейтіндей орындалу операциясын бастайды.

Синтаксис

DoEvents( )

Түсініктемелер

DoEvents функциясы Visual Basic (кәсіби шығарылым) сияқты Microsoft Visual Basic бағдарламасының автономды нұсқаларында ашық тұрған пішіндердің санын білдіретін бүтін сан деректер түріды қайтарады. Басқа бағдарламаларда DoEvents функциясы нөльді қайтарады.

DoEvents функциясы басқаруды операциялық жүйеге береді. Операциялық жүйе кезектегі оқиғаларды орындап болған соң және SendKeys кезегіндегі барлық кілттер жіберілгеннен кейін, басқару қайтарылады.

DoEvents функциясы файлды іздеу әрекеті сияқты пайдаланушыға басталған процессті тоқтатуға мүмкіндік беретін қарапайым әрекеттер үшін ең пайдалы функция болып табылады. Ұзақ орынадалатын процесстер үшін, процессорға бағыну әрекетін Таймерді қолдану арқылы немесе тапсырманы ActiveX EXE компонентіне тапсыру арқылы орындау ең тиімді болады. Соңғы жағдайда, тапсырманың орындалуы бағдарламаңыздан толығынан тәуелсіз жалғасады, ал операциялық жүйе бірнеше тапсырмалардың және уақытты кванттау әрекеттерінің орындалуын қамтамасыз етеді.

Оқиға процедурасында процессорға уақытша бағынған кезіңізде, бірінші шақыру әрекеті қайтарылмайынша, процедура кодыңыздың басқа бір бөлегінен орындалмайтынын қамтамасыз етіңіз; әйтпесе, бұл күтпеген нәтижелерге әкеліп соқтыруы мүмкін. Оның үстіне, егер басқа бағдарламалар, басқаруды процессорға бергеніңізден кейін, процедураңызбен күтпеген жолдармен қатынаса алатын болса, онда DoEvents функциясын қолданбаңыз.

Мысал

Ескерту : Төмендегі үлгілер осы жетені Бағдарламаларға арналған Visual Basic (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.
Дағдыларды жетілдіру
Оқыту курсымен танысыңыз
Жаңа мүмкіндіктерге бірінші болып қол жеткізу
Office Insider бағдарламасына қосылу

Осы ақпарат пайдалы болды ма?

Пікіріңіз үшін рақмет!

Пікіріңізге рақмет! Сізді Office қолдау көрсету қызметіндегі агенттердің бірімен байланыстырған жөн болуы мүмкін.

×