Funkcija DoEvents

Piezīme.: Mēs vēlamies sniegt jums visjaunāko palīdzības saturu jūsu valodā, cik vien ātri to varam. Šī lapa ir tulkota automatizēti, un tajā var būt gramatiskas kļūdas un neprecizitātes. Mūsu nolūks ir šo saturu padarīt jums noderīgu. Vai lapas lejasdaļā varat mums pavēstīt, vai informācija jums noderēja? Ērtai atsaucei šeit ir šis raksts angļu valodā.

Piezīme.: Funkcija, metodi, objektu vai rekvizītu, kas aprakstīts šajā tēmā ir atspējots, ja Microsoft Jet Expression Service ir atvērta smilškastes režīmu, kas neļauj iespējami nedrošās izteiksmes novērtēšanas. Lai iegūtu papildinformāciju par smilškastes režīmu, meklējiet "smilškastes režīma" palīdzībā.

Nodod izpildi operētājsistēmai, lai tā varētu apstrādāt citus notikumus.

Sintakse

DoEvents ( )

Piezīmes

Funkcija DoEvents atgriež veselam skaitlim, kas pārstāv atvērtas veidlapas savrupais izdevums versijas Microsoft Visual Basic, piemēram, Visual Basic Professional Edition skaitu. DoEvents atgriež nulles citās programmās.

DoEvents nodod vadību operētājsistēma. Vadīklas tiek atgriezta pēc operētājsistēmas instalēšana ir pabeigta, apstrādes notikumus savā rindā un nosūtītam visas atslēgas SendKeys rindā.

DoEvents ir vispiemērotākā vienkāršas lietas, piemēram, kas ļauj lietotājam atcelt procesu, pēc tam, kad tā ir sākusies, piemēram, failu meklēšana. Procesiem, iegūstot procesors ir labāk realizēt, izmantojot taimeri vai deleģēt uzdevumu ActiveX EXE komponentam. Šādā gadījumā uzdevumu varat turpināt pilnīgi neatkarīgi no jūsu lietojumprogrammas un operētājsistēmas instalēšana notiek pats par vairāku uzdevumu izpildi un laika sadali.

Jebkurā laikā jūs īslaicīgi yield procesors laikā notikuma procedūru, pārliecinieties, vai procedūra nav izpildīta atkārtoti no citas daļas kodu pirms atgriež pirmo zvanu; tas var izraisīt neparedzamus rezultātus. Turklāt, ja citas lietojumprogrammas varēja iespējams mijiedarboties ar jūsu procedūru neparedzētu veidos laikā, kad ir atrasta vadības Nelietojiet DoEvents .

Piemērs.

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā izmantota funkcija DoEvents izraisīja izpildes yield operētājsistēmai vienreiz katru 1000 atkārtojumiem kursā. DoEvents atgriež skaitli atvērt Visual Basic veidlapas, bet tikai tad, ja resursdatora lietojumprogrammā ir 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.
Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta aģentiem.

×