Hilfe beim Umbau eines Programmes

Besser, aber an dieser Stelle immer noch untypisiert.


Stichwort Debuggen, auch wenn's hier mit ner ollen MessageBox ist:
Schieb mal zwei Zeilen zwischen Zeile#4 und Z#5:
Wenn da bei der ersten Box keine Zahl über 0 kommt, sind einfach keine Daten geladen.

Und die Prüfmessageboxen? Die sollten Dir eigentlich noch zeigen, ob da überhaupt was gefunden werden kann. Oder klappt das jetzt doch alles?

Das war ein Grund, warum EdR auf die Benennung der tDS-Bestandteile hinwies. Ich nannte damals, als ich noch mit tDSs gearbeitet hatte, meine DataSets einfach nur Tds und die Tabellen nach dem, was drinstand. Und um einige Leser zu ärgern: Natürlich im Plural . Aber Präfixe verwendete ich schon jahrelang nur noch für Controls, da ich erkannte, dass sie sonst nur Ballast sind.

Eine Möglichkeit wäre: "manuelles" Sammeln der Daten, Wertberechnung, Daten ins DGV packen.
Du kannst auch eine DataTable anlegen, diese mit den berechneten Werten befüllen und dann die DataTable als DataSource (D)eines DGV hernehmen.

In beiden Fällen musst Du alle Rows Deiner Rohdatentabelle durchgehen und die Daten sammeln. Wenn sich der Monat ändert, dann die bisherigen Daten zu jeweiligen Durchschnittswerten berechnen und dann eben ab ins DGV oder in die DataTable damit. Und dann die Sammeldatenvariablen auf Null setzen, damit die Daten des nächsten Monats reinkommen können.

Wenn in deiner Tabelle tageweise dokumentiert wird und du Monatswerte willst, muss du gruppieren.
Dann ist quasi nicht mehr die Tabelle die DataSource, sondern ein LINQ Ergebnis.

.DataSource = From t in dsWeather.dtWeather Group By t.Monat Into Sum(t.Regenmenge) / Max(t.Tag)

Prinzipiell ja, aber: Das klappt mit den aktuellen Daten so nicht, da Monat eine Zahl zwischen 1 und 12 ist. Dementsprechend würden z.B. die Januarwerte aller Jahre miteinander verwurstet werden.
Aber man kann ja auch Daten bei der Groupie-Bildung kombinieren, also z.B. dsWeather.dtWeather.GroupBy(Function(x) x.Monat.ToString("00") & " - " & x.Jahr). Dann ergeben sich die in Post#47 gezeigten/gewünschten Gruppenkeys mit Datumsangabe 01 - 2022 usw.

##########

Eine Beispiel zum Erhalt der Teildaten:

Offensichtlich immer noch nichts kapiert. (Also nicht nur in diesen 51 Posts, sondern auch in den ganzen anderen Threads von dir zum Thema)
Falsch:


Richtig: da sind doch alle Spalten schon drinne, und sind typisiert.

---

Zu deine Rechenfehler kann man nix sagen, man sieht ja nicht die Ausgangsdaten.
Wenn das geklärt ist, und auch, dass die Spalten auf AllowNull=False gesetzt werden sollten, dann mag jemand anders dir einen sauberen, funktionierenden BerechnungsCode zu geben.
Aber er soll sich keine Hoffnung auf einen Lernerfolg machen - da falle ich ja schon seit Jahren immer wieder drauf rein.

Was EDR wohl sagen will ist, keiner hier kann als Lehrer fungieren, in dem Sinne, dass er für dich didaktisch die korrekte Herangehensweise auslotet.
Ich denke was überwiegend durch den Diskurs klar wird, ist, dass der Fokus noch nicht sitzt. Aber richten können wir diesen nicht. Bzw. könnten wir schon, aber ob dir das hilft wäre fragwürdig.

Ich denke deine Tabelle heißt "dtWeather", dann wäre die Klasse, die du brauchst dtWeatherDataTable nicht WeatherDataTable.
Der Fehler ist aber vielleicht gar nicht mal schlecht fürs Verständnis gewesen.
(Wenn du ein DataSet erstellst und darin eine Tabelle, dann erzeugst du automatisch eine Klasse mit Namen: "Name der Tabelle + DataTable"

Amelie schrieb:

das der Durchschnitt von "4.5" nicht "1.5" bekomme ich noch auf die Reihe. Was ich nicht verstehe, warum das falsch berechnet wird, weil ja die anderen Werte stimmen

Der Schnitt von 4.5, 0 und 0 ist aber 1.5. Ich denke mal Schneetag und Regen gehören beide zur selben Tabelle? Wenn es nicht schneit muss das den Schnitt doch runterziehen oder wie sollen wir das sehen? (Referenz aus deinem LINQ: entweder Regen größer 0 oder Schneetag > 0, warum überhaupt die 0er rauslassen? Durchschnittliche Dürre wäre doch auch ein interessantes Ergebnis)

Amelie schrieb:

New WeatherDataTable() ' ist nicht definiert

Na, dann guck doch verdammt nochmal in deim Dataset nach, wie die WeatherDataTable richtig heisst - dtWeatherDataTable etwa? (du liebst ja diesen unnützen Prefix)

---

Amelie schrieb:

Nach meiner Logik kann ich doch nicht gleichzeitig in ein und die selbe DT etwas auslesen und reinschreiben???

OMG!
Informiere dich mal über die Bedeutung des Schlüsselworts New.
Und guck nochmal den Code an:

Amelie schrieb:

VB.NET-Quellcode

1. Dim dtAverageWeather As New WeatherDataTable()

na sowas! Da kommt ja das Schlüsselwort New vor!
Ja, aber was bedeutet das denn nun?
Und warum ergibt nun diese Einlassung

Amelie schrieb:

die selbe DT

gar keinen Sinn?

Ich habe nur die Daten-XML aus Post#39. Und da kommt als Auszug raus:

Daher kann zumindest ich die Berechnung nicht nachvollziehen. Diese Anzahl = 3 und Anzahl = 1 ist auch nicht logisch, von daher liegt es nahe, dass - wie @Haudruferzappeltnoch bereits schrieb - Nullwerte verrechnet werden und dadurch sich der Durchschnitt ändert. Aber das ist Spekulation.
Das mit der neuen Tabelle anlegen ist auf meinem Mist gewachsen, weil ich es wohl nicht eindeutig geschrieben habe: Ein Weg ist: Eine Ergebnisdatentabelle im DataSet-Designer anzulegen. Das manuelle Erstellen dieser Tabelle mittels Code ist mühsam und fehleranfällig. Daher:

• Lösch den DataTableerstellungscode, der auf

  VB.NET-Quellcode

  1. ' Erstellen eines neuen DataTables für die Durchschnittswerte
  und

  VB.NET-Quellcode

  1. ' Hinzufügen der erforderlichen Spalten zum neuen DataTable
  folgt
  
• erstell eine neue Tabelle im tDS-Designer, in der dann die Monatsergebnisse reinsollen
  
• berechne die Monatsdurchschnittswerte
  
• schreibe diese Daten in die im tDS-Designer angelegte
  

Und vor Speichern der Daten-XML kannst Du die WErgebnisse Tabelle leeren, damit die erzeugten Ergebnisdaten nicht in der XML landen.