DoEvents, funksjon

Obs!: Vi ønsker å gi deg det nyeste hjelpeinnholdet så raskt som mulig, på ditt eget språk. Denne siden er oversatt gjennom automatisering og kan inneholde grammatiske feil eller unøyaktigheter. Formålet vårt er at innholdet skal være nyttig for deg. Kan du fortelle oss om informasjonen var nyttig for deg nederst på denne siden? Her er den engelske artikkelen for enkel referanse.

Obs!: Funksjonen, metoden, objektet eller egenskapen som er 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

Obs!: 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.
Bli bedre på Office
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.

×