|
VB.Net-Forum - Beitragsübersicht - |
|
Von |
Haselsteiner |
Datum |
31. August 2015 um 15:33:23 |
Frage |
Hallo zusammen, ich habe Probleme mit Berechnungsformularen in einem vb.net-Programm.
Hier, in Deutschland funktioniert alles Bestens, in der Schweiz gibt es aber Probleme. Dort werden die Labels für Uaus und R3 nicht angezeigt.
Hat das etwas mit den unterschiedlichen Dezimaltrennern(Komma/Punkt) zu tun? Oder müssen die Variablen mit "Private" deklariert werdn? Als IDE benutze ich Visual Studio 2015.
Vielen Dank für Eure Hilfe! Haselsteiner
' Codeausschnitt Option Strict On . . . Dim R1, R2, R3, vin, vout As Double . . ' Durch _KeyUp wird die Rechenroutine (calc()) gestartet Private Sub txtVref_KeyUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) _ Handles txtVref.KeyUp, txtR2.KeyUp, txtR1.KeyUp calc() End Sub . . . ' Hier ist die Rechenroutine Private Sub calc() Try vref = CDbl(txtVref.Text) R1 = CDbl(txtR1.Text) R2 = CDbl(txtR2.Text)
vout = (vref * (R2 / (R1 + R2))) lblUaus.Text = vout.ToString("N2") & " V" 'Uaus anzeigen
R3 = (R1 * R2) / (R1 + R2) lblR3.Text = R3.ToString("N1") & " kOhm" 'R3 anzeigen Catch End Try End Sub
|
|
[ Antwort schreiben | Zurück zum VB.Net-Forum | Forum-Hilfe ] |
|
Letzte Aktualisierung: Sonntag, 13. Dezember 2015 |
|