Guten Morgen liebes Forum
Ich kämpfe mit folgendem Problem. Ich lasse mir in einem Chart ein ganzes jahr an Messungen anzeigen. Funktioniert wunderbar.
Leider wird mir in der X axis anstatt nur dem Datum auch noch eine Uhrzeit angezeit. Beispiel: 10.01.2023 00:00:00
Ich brauche nur das Datum ohne Uhrzeit da es sehr viel Platz verbraucht.
Die Abfrage mache ich so:
und der QUERY (MySqlSelectGrafikTank1Jahr) sieht so aus:
In der db ist ist das Feld "datum" als Typ "date" hinterlegt.
Warum bekomme ich jetzt aber trotzdem eine Uhrzeit mit?
Danke und Grüße
Gebhard
Ich kämpfe mit folgendem Problem. Ich lasse mir in einem Chart ein ganzes jahr an Messungen anzeigen. Funktioniert wunderbar.
Leider wird mir in der X axis anstatt nur dem Datum auch noch eine Uhrzeit angezeit. Beispiel: 10.01.2023 00:00:00
Ich brauche nur das Datum ohne Uhrzeit da es sehr viel Platz verbraucht.
Die Abfrage mache ich so:
VB.NET-Quellcode
- Imports MySql.Data.MySqlClient
- Public Class Grafik_Tank1
- Private Sub Grafik_Tank1_Load(sender As Object, e As EventArgs) Handles Me.Load
- ChartLeitwert.Series(0).Points.Clear()
- ChartpHWert.Series(0).Points.Clear()
- ChartpHWert.Series(1).Points.Clear()
- ChartpHWert.Series(2).Points.Clear()
- ChartTemperatur.Series(0).Points.Clear()
- ChartTemperatur.Series(1).Points.Clear()
- ChartTemperatur.Series(2).Points.Clear()
- 'ergebnis der comboxbox auswahl definieren und gleich den ausgewählten wert eintragen
- Dim resultComboboxJahr As String = FrmFeuchtraumListe.ComboboxJahrAuswahl.SelectedItem.ToString
- Dim READER As MySqlDataReader = Nothing
- Try
- ConnectDatabase()
- If IsNumeric(resultComboboxJahr) Then
- 'variable für mysql befehl erstellen und eine leere zeichenkette zuweisen
- Dim myQueryJahre As String = MySqlSelectGrafikTank1Jahr(resultComboboxJahr)
- Dim cmd = New MySqlCommand(myQueryJahre, con)
- READER = cmd.ExecuteReader
- While READER.Read
- ChartLeitwert.Series("Leitwert").Points.AddXY(READER.GetString("datum"), READER.GetDecimal("leitwert"))
- ChartpHWert.Series("pH").Points.AddXY(READER.GetString("datum"), READER.GetDecimal("phwert"))
- ChartpHWert.Series("max.").Points.AddXY("datum", druckereimanagerSettings.max_phwert.Replace(",", "."))
- ChartpHWert.Series("min.").Points.AddXY("datum", druckereimanagerSettings.min_phwert.Replace(",", "."))
- ChartTemperatur.Series("Temp.").Points.AddXY(READER.GetString("datum"), READER.GetDecimal("temperatur"))
- ChartTemperatur.Series("max.").Points.AddXY("datum", druckereimanagerSettings.max_temp.Replace(",", "."))
- ChartTemperatur.Series("min.").Points.AddXY("datum", druckereimanagerSettings.min_temp.Replace(",", "."))
- End While
- End If
- Catch myerror As MySqlException
- 'Fehler abfangen
- 'Fehlermeldung und Fehlercode anzeigen
- MessageBox.Show(TM_ERROR_MESSAGE_MYSQL_TABLE_TANK1_HAS_NO_DATA & vbCrLf & myerror.Message & TM_ERROR_CODE & vbCrLf & myerror.Number, TM_ERROR_TYPE_MYSQL, MessageBoxButtons.OK, MessageBoxIcon.Error)
- Finally
- If READER IsNot Nothing Then
- READER.Close()
- End If
- End Try
- End Sub
- End Class
und der QUERY (MySqlSelectGrafikTank1Jahr) sieht so aus:
VB.NET-Quellcode
- Module dbSelectGrafikTank1Jahr
- 'Abfrage Grafik Tank1 Jahr
- Public Function MySqlSelectGrafikTank1Jahr(selectedJahr As String) As String
- 'variable definieren und predefined statement einfügen
- Dim select_statement As String = "SELECT * FROM `DWP`.`feuchtmittelmessung` WHERE tank = 'T1' AND DATE_FORMAT(`DWP`.`feuchtmittelmessung`.`datum`, '%Y') = '" & selectedJahr & "';"
- 'Statement zurückgeben
- Return select_statement
- End Function
- End Module
In der db ist ist das Feld "datum" als Typ "date" hinterlegt.
Warum bekomme ich jetzt aber trotzdem eine Uhrzeit mit?
Danke und Grüße
Gebhard
