Lernpaket MSR mit dem PC

Zeitmessung



Stoppuhr.exe starten

Auch eine Stoppuhr lässt sich leicht programmieren. Verwenden Sie die gleiche Anschlussbelegung für den Schalter wie beim Ereigniszähler. Die Zeit läuft, solange der Schalter geschlossen ist.

.

 


 


Private Sub Timer1_Timer()
Zustand_Neu = RI()
If Zustand_Neu > Zustand Then Zaehler = Zaehler + 1:
Text2.Text = Str$(Zaehler)
Zustand = Zustand_Neu
End Sub
 



Lösen Sie Schaltsignale mit Licht aus. Die folgende Schaltung mit dem Fototransistor dient als Lichtsensor. Sie können z.B. die Einschaltzeit einer Lampe bestimmen.





zurück
weiter
zur Startseite