DoEvents, funksjon

Viktig: Denne artikkelen er maskinoversatt, se ansvarsfraskrivelsen. Du finner den engelske versjonen av artikkelen her som referanse.

Merknad: Funksjonen, metoden, objektet eller egenskapen som beskrevet i dette emnet er deaktivert hvis Microsoft Jet Expression Service kjører i sandkassemodus som hindrer evaluering av potensielt usikre uttrykk. Hvis du vil ha mer informasjon om sandkassemodus, kan du søke etter "sandkassemodus" i Hjelp.

Stopper utføring, slik at operativsystemet kan behandle andre hendelser.

Syntaks

DoEvents ( )

Merknader

DoEvents -funksjonen returnerer et heltall som representerer antall åpne skjemaer i frittstående versjoner av Microsoft Visual Basic, for eksempel Visual Basic Professional Edition. DoEvents returnerer null i alle andre programmer.

DoEvents sender kontroll til operativsystemet. Kontroll returneres etter operativsystemet har fullført behandling hendelsene i køen og alle nøklene i SendTastetrykk -køen er sendt.

DoEvents er mest nyttige for enkle ting som å tillate at en bruker avbryter en prosess etter at den er startet, for eksempel et søk etter en fil. For lang tid prosesser oppnås fører til en prosessor bedre ved å bruke en tidtaker eller delegere oppgaven til en ActiveX EXE-komponent. I det siste tilfellet kan oppgaven fortsette fullstendig uavhengig av programmet og operativsystemet tar seg av fleroppgavekjøring og tidsdeling.

Hver gang du midlertidig stopper prosessor i en hendelsesprosedyre, gjør at prosedyre ikke utføres på nytt fra en annen del av koden før første samtalen returnerer. Dette kan forårsake uventede resultater. I tillegg Bruk ikke DoEvents Hvis andre programmer kan samhandle med prosedyren på uforutsette måter i tiden du har stoppet kontrollen.

Eksempel

Merknad: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

Dette eksemplet bruker funksjonen DoEvents kan forårsake kjøring av til å stoppe operativsystemet hver 1000 gjentakelse av løkken. DoEvents returnerer antallet åpne Visual Basic-skjemaer, men bare når vertsprogrammet er 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.

Merknad: Ansvarsfraskrivelse for maskinoversettelse: Denne artikkelen er oversatt av et datasystem i stedet for en oversetter. Microsoft tilbyr disse maskinoversettelsene slik at brukere som ikke snakker engelsk, får tilgang til innhold om Microsoft-produkter, -tjenester og –teknologier. Ettersom artikkelen er maskinoversatt, kan den inneholde feil i vokabular, syntaks eller grammatikk.

Utvid ferdighetene dine
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Office Insiders

Var denne informasjonen nyttig?

Takk for tilbakemeldingen!

Takk for tilbakemeldingen! Det høres ut som det kan være lurt å sette deg i kontakt med én av våre Office-kundestøtteagenter.

×