Når du programmerer et program i Visual Basic 6 ( VB6 ) kan det noen ganger være nyttig å ta en pause en subrutine og vent til brukeren trykker på en knapp , for eksempel at brukeren må lese en dukker opp boksen og klikk " Ok" før du fortsetter. Du kan pause en subrutine og vente på et tastetrykk ved å plassere " DoEvents "-metoden inne i en loop, som ikke låser opp maskinen som " Wait "-metoden . Instruksjoner
en
Åpne VB6 kilde filen i et redigeringsprogram , for eksempel Microsoft Visual Basic.
2
Erklærer en global boolsk variabel å spore om knappen er trykket ved å legge følgende kode på toppen av skjemaet : en
Option Explicit
Public ButtonIsClicked Som Boolean
3
Initialiser verdien av " ButtonIsClicked " variable i begynnelsen av subrutinen din ved å legge inn koden : en
ButtonIsClicked = false
4
Ring " DoEvents ( ) "-metoden inne i en "mens " loop å vente til knappen har blitt trykket ved å legge til følgende kode i subrutine din : en
Button
Mens ButtonIsClicked = false
Application.DoEvents ()
End Mens
" DoEvents "-metoden behandler en eksisterende Windows-meldinger , for eksempel en knapp klikk. . Løkken vil fortsette å gå til knappen klikkes
5
Åpne GUI Form Designer , dobbeltklikker du på knappen brukeren må klikke og legge til følgende kode :
ButtonIsClicked = true
6
Lagre VB6 filen , kompilere og kjøre programmet for å kjøre modifisert subrutine .