Timer kontroll i Visual Basic er en veldig nyttig enhet som sender en puls til en søknad på forhåndsbestemte intervaller . Kontrollen kan vise oppdateringer av hvor lenge en installasjon tar ved å telle ned , overvåke hva en bruker gjør eller utføre andre rutiner mens et hovedprogram er i gang . Hvis Visual Basic Express , som er en NET program , er involvert noen av kodeordene vil variere . Du trenger
Visual Basic
Vis flere instruksjoner
en

Åpne Visual Basic og velg så "New Project " a " Standard EXE ". Klikk på " File" og "Lagre Form1 som" og gi den et navn som " timerproject . " Klikk deretter "Lagre prosjekt som" og gi den navnet "Timer Project. " Visual Basic bruker riktige filtyper som standard.
2

Endre " Bildetekst " eiendom i Properties panelet nederst til høyre for å "Timer kontroll . "
3

Plasser en Timerstyring på skjemaet ved å dobbeltklikke på "Timer "-kontroll, som vises som en klokke ikonet i verktøykassa i venstre panel . Kontrollen vil ikke være synlig når programmet kjører . For klarhet , klikk og dra det til en nedre hjørne av skjemaet.
4

Sett en etikett på skjemaet ved å dobbeltklikke på "Label "-kontroll, representert ved et stort bokstaven " A" i Toolbox. Klikk på "Label " nå på skjemaet , og deretter i Properties panelet endre navnet på etiketten til " Clock" og slette bokstavene i bildeteksten linje. Gjenta dette for et sekund etiketten og gi den navnet " Hilsen ". Endre bredden for begge etiketter til 2000 .
5

Klikk på View > Kode øverst for å åpne en kode vindu . Skriv inn koden for timerhendelser . Dette er bare et eksempel , for å kontrollere ønsket timer bruker du trenger å endre koden til å gjøre hva du vil den skal gjøre : Private Sub Form_Load ( ) Timer1.Interval = 5000 ' tallene representerer millisekunder så 5000 tilsvarer én gang hvert 5. sekund ; endring dette til ønsket periodCall Timer1_TimerEnd SubPrivate Sub Timer1_Timer ( ) strGreeting1 Dim , strGreeting2 , strTime Som StringstrTime = Tid $ Clock.Caption = Tid $ strGreeting = " Hei ! " Hvis Mid $ ( strTime , 7 , 1 ) = " 1" ThenGreeting . Caption = strGreetingElse : . Greeting.Caption = "" End IfEnd Sub
6

Test koding ved å trykke " F5" Den aktuelle tiden skal vise og oppdatere hvert 5. sekund . Når den første sifferet i sekunder displayet faller mellom 10 og 19 , ordene " Hello there! " vises og deretter forsvinne i 50 sekunder . Hvis ingen av disse hendelsene skjer, kontrollerer koden i trinn fem for nøyaktighet.
7

snu dette til en endelig program ved å klikke på Fil> Gjør Timer Project.exe.Run programmet fra der du lagret den.