Das Timer-Steuerelement in Visual Basic ist ein sehr nützliches Gerät, das einen Impuls sendet , um eine Anwendung in vorgegebenen Intervallen . Die Steuerung kann Updates , wie lange eine Installation durch Abzählen unter anzuzeigen, zu überwachen, was ein Benutzer tun oder andere Routinen ausführen , während ein Hauptprogramm läuft. Wenn Visual Basic Express, die ein NET -Programm ist , beteiligt ist einige der Codewörter unterscheiden . Things You
Visual Basic
brauchen anzeigen Weitere Anweisungen
1
Öffnen Sie Visual Basic , und wählen Sie als " New Project" ein "Standard-EXE . " Klicken Sie auf " Datei" und " Speichern form1 als" und geben Sie ihm einen Namen wie " timerproject . " Dann klicken Sie auf " Projekt speichern unter " und nennen Sie es "Timer -Projekt. " Visual Basic gilt die richtigen Datei-Erweiterungen standardmäßig aktiviert.
2
Ändern Sie die Eigenschaft "Caption" im Eigenschaften-Bedienfeld auf der unteren rechten auf " Timer Control".
3
Legen Sie ein Timer-Steuerelement auf dem Formular durch einen Doppelklick auf die "Timer "-Steuerung, die als Uhr-Symbol angezeigt wird, in der Toolbox in der linken Seite . Die Steuerung wird nicht sichtbar sein, wenn das Programm läuft . Aus Gründen der Klarheit , klicken und ziehen Sie es an einer unteren Ecke des Formulars.
4
Setzen Sie ein Label auf dem Formular durch einen Doppelklick auf das "Label"- Steuerung , von einem großen Buchstaben dargestellt "A" in die Toolbox. Klicken Sie auf das " Etikett " jetzt auf dem Formular , und klicken Sie dann im Eigenschaftenfenster ändern Sie den Namen des Etiketts auf "Clock" und löschen Sie die Buchstaben in der Überschrift Linie . Wiederholen Sie diesen Vorgang für eine zweite Etikett und nennen Sie es "Gruß . " Ändern Sie die Breite für beide Etiketten bis 2000.
5
Klicken Sie auf Ansicht > Code an der Spitze , um einen Code zu öffnen. Schreiben Sie den Code für ein Timer-Ereignis . Dies ist nur ein Beispiel ; zu steuern Ihren gewünschten Timer verwendet , müssen Sie den Code ändern, um zu tun , was Sie tun möchten : Private Sub Form_Load () Timer1.Interval = 5000 ' Zahlen repräsentieren Millisekunden so 5000 gleich einmal alle 5 Sekunden ändern dies periodCall Timer1_TimerEnd SubPrivate Sub Timer1_Timer () Dim strGreeting1 , strGreeting2 , strTime gewünschten Als StringstrTime = Zeit = Zeit Clock.Caption $ $ strGreeting = " hallo Du! " Wenn Mid $ ( strTime , 7, 1) = "1" ThenGreeting . caption = strGreetingElse : . Greeting.Caption = " " End Sub IfEnd
6
Testen Sie die Codierung mit der Taste " F5" Die aktuelle Uhrzeit anzeigen soll und aktualisieren alle 5 Sekunden. Wenn die erste Ziffer der Sekundenanzeige fällt zwischen 10 und 19 werden die Worte " Hallo Du! " erscheint, und dann verschwinden für 50 Sekunden. Wenn keines dieser Ereignisse eintritt, überprüfen Sie den Code in Schritt fünf für die Richtigkeit.
7
Schalten Sie diese in eine endgültige Programm , indem Sie auf Datei> Als Timer Project.exe.Run das Programm aus , wo immer Sie gespeichert .
