Når du programmerer et program i Visual Basic 6 ( VB6 ) det kan undertiden være nyttigt at holde pause en subrutine og vente, indtil brugeren trykker på en knap , såsom at brugeren skal læse en pop up box og klik på " Ok" , før du fortsætter . Du kan afbryde en subrutine og vente på en knap tryk ved at placere " DoEvents "-metoden inde i en løkke, som låser ikke computeren op som " Wait "-metoden. Instruktioner
1

Åbn VB6 kildefilen i en editor såsom Microsoft Visual Basic.
2

Erklær en global boolesk variabel til at spore , hvis knappen er blevet trykket ved at tilsætte følgende kode i toppen af ​​din formular : Hej

Option Explicit

Public ButtonIsClicked Som Boolean
3

initialiseres værdien af " ButtonIsClicked " variable i starten af ​​din subrutine ved at tilføje koden : Hej

ButtonIsClicked = false
4

Kald " DoEvents () "-metoden inde i en ", mens " loop til at vente, indtil knappen har blevet presset ved at tilføje følgende kode i dit subrutine : Hej

Button

ButtonIsClicked = false

Application.DoEvents ()

End Mens

" DoEvents " metoden behandler eventuelle eksisterende Windows- beskeder , såsom en knap klik . . Sløjfen fortsætte med at gå , indtil der klikkes på knappen
5

Åbn GUI Form Designer , skal du dobbeltklikke på knappen brugeren skal klikke og tilføje følgende kode : Hej

ButtonIsClicked = true
6

Gem VB6 filen , kompilere og køre programmet til at køre din ændrede underprogram.