Hvordan Pause en subrutine Inntil trykker på en knapp i VB6

Når du programmerer et program i Visual Basic 6 (VB6) kan det noen ganger være nyttig å ta en pause en subrutine og vente til brukeren trykker på en knapp, som krever at brukeren må lese en pop-up boksen og klikk "Ok" før du fortsetter. Du kan stanse en subrutine og vente på et tastetrykk ved å plassere "DoEvents" metoden inne i en loop, som ikke låse opp datamaskinen som "Vent" metoden.

Bruksanvisning

1 Åpne VB6 kildefilen i et redigeringsprogram, for eksempel Microsoft Visual Basic.

2 Erklære en global boolsk variabel til å spore hvis knappen er blitt trykket ved å legge til følgende kode øverst i skjemaet:

Option Explicit

Offentlig ButtonIsClicked Som boolsk

3 Initial verdien av "ButtonIsClicked" variable ved begynnelsen av subrutinen ved å legge koden:

ButtonIsClicked = false

4 Kaller "DoEvents ()" metoden inne i en "mens" loop å vente til knappen er trykket ved å legge til følgende kode i din subrutine:

Knapp

Mens ButtonIsClicked = false

Application.DoEvents ()

slutt Mens

Den "DoEvents" metoden behandler alle eksisterende Windows-meldinger, for eksempel en knapp klikk. Sløyfen 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 modifiserte subrutine.