vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2017
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Statistik in Chart Diagramm 
Autor: ERBRU
Datum: 17.04.17 17:36

Hallo zusammen,

möchte eine Statistik auf eine Form ausgeben in Label oder DGV und als Diagramm in einem Chart anzeigen

der Code dafür ist Verbesserungsfähig ich denke da wahrscheinlich zu kompliziert.
Frage: wie bekomme ich das dann in ein Chart-Balkendiagramm angezeigt.

hoffe das jemand eine Idee hat, und das hier verstanden hat.
es gibt erledigte und offene Meldungen in der Tabelle TPMMeldung


 '--- Variabeln setzen
        Dim Statusabgearbeitet As Double
        Dim Statusnichtabgearbeitet As Double
        Dim Wert1 As System.Data.EnumerableRowCollection(Of TPMMeldungRow)
        Dim Wert2 As System.Data.EnumerableRowCollection(Of TPMMeldungRow)
 
        'Wert1 ermitteln
        Wert1 = From Reihe In Me.TPMDB.TPMMeldung
                   Where Reihe.RowState <> DataRowState.Deleted AndAlso _
                   Reihe.erledigt = True
     Select Reihe
        Dim anzahlWert1 As Integer = Wert1.Count
 
        'Wert2 ermitteln
        Wert2 = From Reihe In Me.TPMDB.TPMMeldung
        Where Reihe.RowState <> DataRowState.Deleted AndAlso _
        Reihe.erledigt = False
     Select Reihe
        Dim anzahlWert2 As Integer = Wert2.Count
 
 
 
        Dim Gesamtwert As Integer = anzahlWert1 + anzahlWert2
 
        '------ Prozent ausrechnen
        Statusabgearbeitet = anzahlWert1 / Gesamtwert * 100
        Statusnichtabgearbeitet = anzahlWert2 / Gesamtwert * 100
        '------- Anzeigen in Label auf der Form
        ''Label215.Text = String.Format("{0:0.00} %", Statusabgearbeitet) & "" & _
          "erl."
        ''Label216.Text = String.Format("{0:0.00} %", Statusnichtabgearbeitet) _
        & " i.B."
        ''Label217.Text = Gesamtwert.ToString & " Meld."
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Statistik in Chart Diagramm647ERBRU17.04.17 17:36
Re: Statistik in Chart Diagramm345Manfred X17.04.17 18:59
Re: Statistik in Chart Diagramm338ERBRU17.04.17 19:21
Re: Statistik in Chart Diagramm349Manfred X17.04.17 22:39
Re: Statistik in Chart Diagramm319ERBRU18.04.17 06:28
Re: Statistik in Chart Diagramm311ERBRU18.04.17 11:15
Re: Statistik in Chart Diagramm315Manfred X18.04.17 12:16
Re: Statistik in Chart Diagramm306ERBRU18.04.17 13:39
Re: Statistik in Chart Diagramm304Manfred X18.04.17 14:04
Re: Statistik in Chart Diagramm305ERBRU18.04.17 15:44
Re: Statistik in Chart Diagramm308Manfred X18.04.17 16:07
Re: Statistik in Chart Diagramm296ERBRU18.04.17 18:34
Re: Statistik in Chart Diagramm296ERBRU20.04.17 18:36
Re: Statistik in Chart Diagramm309Manfred X20.04.17 19:35
Re: Statistik in Chart Diagramm299ERBRU21.04.17 06:03

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2017 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel