Hallo
Ich bin neu hier, und muss zu erst mal sagen, das mir das Forum schon sehr gut geholfen hat. Ich programmieren eigentlich überhaupt nicht, wollte mir nur ein simples tool bastel.
Es sind aber immer die kleinen Sachen die aufhalten und wo man auf den schlauch steht.
Mein Problem ist das ich ein Temperatur Durschnittswert ermitteln möchte. Ich habe 16 TextBoxen wo von 7 mit Temperatur Daten gefüllt sind der Rest mit null.
Jetzt sollen aber genau diese 7 TextBoxen den Teilungs Wert ergeben und nicht die 16 TextBoxen.
Wie kann man das Realieseren? ich hoffe, das es richtig erklärt ist
Ich bin neu hier, und muss zu erst mal sagen, das mir das Forum schon sehr gut geholfen hat. Ich programmieren eigentlich überhaupt nicht, wollte mir nur ein simples tool bastel.
Es sind aber immer die kleinen Sachen die aufhalten und wo man auf den schlauch steht.
Mein Problem ist das ich ein Temperatur Durschnittswert ermitteln möchte. Ich habe 16 TextBoxen wo von 7 mit Temperatur Daten gefüllt sind der Rest mit null.
Jetzt sollen aber genau diese 7 TextBoxen den Teilungs Wert ergeben und nicht die 16 TextBoxen.
Wie kann man das Realieseren? ich hoffe, das es richtig erklärt ist
VB.NET-Quellcode
- 'Temperatur Durchschnitt'
- Dim temperatur As Double = IIf(Double.TryParse(TextBox112.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox111.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox109.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox110.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox108.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox107.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox106.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox105.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox104.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox103.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox102.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox101.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox100.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox99.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox98.Text, temperatur), temperatur, 0) + _
- IIf(Double.TryParse(TextBox97.Text, temperatur), temperatur, 0)
- TextBox117.Text = temperatur.ToString("N0")
- 'Ende'
