Time , kritisk i mange områder af livet, spiller ofte en afgørende rolle i softwareudvikling så godt. Nogle spil , for eksempel bestå måske af moduler, der har brug for at kende det nøjagtige tidspunkt ned til millisekund. VB.NET udviklere har adgang til en nyttig . NET control kaldet "Timer ". Du skal blot trække en af disse kontroller på dit projekts form og . NET navne det Timer1 hvis ingen andre timere eksisterer. Din ansøgning kan derefter bruge Timer1 at udløse begivenheder på intervaller, du angiver. Instruktioner
1
Launch Visual Studio. Klik på menuen "Filer" , og klik derefter på "Ny" for at vise en liste med valgmuligheder. Klik på " Project" valgmulighed , og klik derefter på "Visual Basic ".
2
Dobbeltklik på " Windows Forms Application ". Visual Studio opretter en ny Windows formularer projekt. En ny form vises i projektets design -vinduet.
3
Klik på "Vis" -menuen og derefter klikke på "Toolbox " for at se Visual Studio værktøjskasse . Find " Timer" kontrol i værktøjskassen, og dobbeltklik på denne kontrol. En kontrolgruppe opkaldt Timer1 vises under formularen nederst på skærmen.
4
Højreklik på " Timer1 ", og klik derefter på "Egenskaber " for at se timeren Egenskaber vinduet. Klik på " pil" ikon øverst i vinduet. Den " Tick " begivenhed vises . Dobbeltklik på denne ikon. Visual Studio åbner koden vinduet og viser " Timer1_Tick " sub. Denne sub kører hver gang Timer1 ticks . Du bestemmer hvor ofte timeren flåter ved at indstille dens " Interval " ejendom
5
Indsæt følgende kode i før sub s " End Sub" erklæring: .
Timer1.Stop ()
MessageBox.Show ( " Tick udløst begivenhed. Tick Tæller = " & tickCounter.ToString () )
p Hvis tickCounter < tickCounterLimit Så
Timer1.Start () < br >
tickCounter = tickCounter + 1
End If
Denne kode --- som kører når Timer1 flåter --- standser timeren og åbner en besked boks . Meddelelsen box viser værdien af en variabel ved navn tickCounter . Den " Hvis" erklæring efter MessageBox.Show erklæring genstarter timeren , hvis værdien af tickCounter er mindre end den frist du har angivet i variablen hedder tickCounterLimit . Koden tilføjer derefter 1 til tickCounter variable
6
Flyt til toppen af koden vinduet, og indsæt koden nedenfor over alle andre udsagn i koden vinduet : .
private tickCounter
privat timerInterval
privat tickCounterLimit
Disse udsagn definerer tre variabler, der benyttes af andre subs i applikationen.
7
Press F7. Formularen vises igen i koden vinduet. Dobbeltklik på formularen titellinje øverst i formularen. Koden åbnes og viser de " Form1_Load " sub. Dette kører , når formularen belastninger
8
Indsæt følgende kode, før denne sub er " End Sub" erklæring: .
TickCounter = 1
timerInterval = 2000 < br >
tickCounterLimit = 3 fotos
Timer1.Interval = timerInterval
Timer1.Start ()
første erklæring sætter værdien af tickCounter variabel til 1. . Den timerInterval variabel holder value " 2000 " i dette eksempel. Det er antallet af millisekunder timeren venter, inden udførelsen af " Timer1_Tick " sub. Den tickCounterLimit variable sætter en grænse for antallet af gange koden vil kalde " Timer1_Tick " sub. Den Timer1.Start Metoden starter timeren.
9
Tryk på " F5 ". at køre projektet . Formularen vises, og timeren starter tikkende . Efter 2000 millisekunder forløbe kører koden inde i Timer1_Tick sub. Denne kode viser en meddelelsesboks , der viser værdien af den tickCounter variabel. Denne værdi er 1. .
10
Tryk på " Enter" for at lukke meddelelsen kassen. Koden genoptager udførelse, trin kryds Counter variabel med 1, og genstarter timeren. 2000 millisekunder senere meddelelsen vises igen , og viser tickCounter variabels værdi, lyder nu 2. .
11
Tryk på " Enter" en sidste gang . Meddelelsen boks viser 3 for den variable værdi. Da du sætte værdien af tickCounterLimit til 3 , er timeren ikke genstarte .