Hallo Forum!
Ich habe vor etwa einer Woche angefangen mich zu Privaten Zwecken in VB einzuarbeiten und wollte erst einmal loswerden, das mir dieses Forum bei einigen zu klärenden Fragen toll weitergeholfen hat und ich mich aus diesem Grund nun Registriert habe, um selbst ggf. kompetente Hilfe bekommen zu können.
Ich habe eine einfache Form gebastelt, in der ich aus einigen Technischen (Ausschließlich Numerischen) Werten per hinterlegter Formel ein Ergebnis bekommen möchte. Das funktioniert auch gut, jedoch bekomme ich beim zweifachen Triggern der jeweiligen Berechnungen eine Fehlermeldung. Ich denke das Problem wird sein, das ich die Ergebnisse nicht nur numerisch, sondern auch mit Einheitszeichen darstellen möchte:
Ist der Fehler, das wenn ich doppelt Triggere, z.B. Textbox1.Text garnicht berechnet werden kann, da der Inhalt nicht ausschließlich Numerisch ist? Gibt es eine möglichkeit den Zusatz " W" bei einem zweiten Triggern zur berechnung zu entfernen?
Da ich in anderen Threads oft gesehen habe, das ein gesamter Code für die Handelung benötigt wird, um ggf. Hilfestellung zu geben, tue ich es also mal nach.
Vorab schonmal vielen Dank und ein schönes Wochenende! - Junior
Ich habe vor etwa einer Woche angefangen mich zu Privaten Zwecken in VB einzuarbeiten und wollte erst einmal loswerden, das mir dieses Forum bei einigen zu klärenden Fragen toll weitergeholfen hat und ich mich aus diesem Grund nun Registriert habe, um selbst ggf. kompetente Hilfe bekommen zu können.
Ich habe eine einfache Form gebastelt, in der ich aus einigen Technischen (Ausschließlich Numerischen) Werten per hinterlegter Formel ein Ergebnis bekommen möchte. Das funktioniert auch gut, jedoch bekomme ich beim zweifachen Triggern der jeweiligen Berechnungen eine Fehlermeldung. Ich denke das Problem wird sein, das ich die Ergebnisse nicht nur numerisch, sondern auch mit Einheitszeichen darstellen möchte:
Ist der Fehler, das wenn ich doppelt Triggere, z.B. Textbox1.Text garnicht berechnet werden kann, da der Inhalt nicht ausschließlich Numerisch ist? Gibt es eine möglichkeit den Zusatz " W" bei einem zweiten Triggern zur berechnung zu entfernen?
Da ich in anderen Threads oft gesehen habe, das ein gesamter Code für die Handelung benötigt wird, um ggf. Hilfestellung zu geben, tue ich es also mal nach.
VB.NET-Quellcode
- ''GROUPBOX4 Heizmitteltemperatur / Spreizung
- Private Sub TextBox22_Keyup(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox22.KeyUp
- If e.KeyCode = Keys.Enter Then
- TextBox21.Focus()
- End If
- End Sub
- Private Sub TextBox21_Keyup(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox21.KeyUp
- If e.KeyCode = Keys.Enter Then
- TextBox20.Focus()
- End If
- End Sub
- Private Sub Textbox20_Keyup(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox20.KeyUp
- If e.KeyCode = Keys.Enter Then
- TextBox24.Text = Math.Round((CDbl(TextBox22.Text.Replace(".", ",")) / (CDbl(TextBox21.Text.Replace(".", ",")) * CDbl(TextBox18.Text.Replace(".", ",")))), 2)
- TextBox19.Text = Math.Round((CDbl(TextBox20.Text.Replace(".", ",")) - CDbl(TextBox24.Text.Replace(".", ","))), 3)
- TextBox23.Text = Math.Round(((((CDbl(TextBox20.Text.Replace(".", ",")) + (CDbl(TextBox19.Text.Replace(".", ",")))) / 2))), 2)
- TextBox22.Text = TextBox22.Text & " W"
- TextBox21.Text = TextBox21.Text & " Kg/h"
- TextBox20.Text = TextBox20.Text & " °C"
- TextBox19.Text = TextBox19.Text & " °C"
- TextBox18.Text = TextBox18.Text & " W/KgK"
- TextBox23.Text = TextBox23.Text & " °C"
- TextBox24.Text = TextBox24.Text & " K"
- End If
- End Sub
Vorab schonmal vielen Dank und ein schönes Wochenende! - Junior