
Schmitt-Trigger - VB.Net Beispiel
Bei dem Schmitt-Trigger-Programm tritt wieder etwas Besonderes auf. Hier haben wir das erste Mal Select Case statt einer IF-Abfrage benutzt. Das liegt daran, dass die Berechnung der Werte davon abhängen, welcher Zustand vorher gültig war. Visuell wird das in einer Hysteresekurve dargestellt. Quelltext Public Class frmST Dim Re, Ui As Double Dim fall Dim uc1, ue, ub2, u1, ua As Double Dim i1, i2 Private Sub frmST_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load fall = 1 berechnen() End Sub ...





