Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Chart-Datenserien an die Spalten in einer Datatable binden
Autor: cubx
Datum: 02.03.11 13:58
Hallo Manfred, vielen Dank erstmal, also mit SQL Tabellen meine ich die Datensätze meiner Tables auf meinem MySqlServer. Diese Daten z.B. die Spalte "Kosten" möchte ich in meinem Chart visuel darstellen um Abweichungen der Werte zu sehen. Meine Klasse sieht so aus:   Imports System.Windows.Forms.DataVisualization.Charting Imports System.Data Imports MySql.Data.MySqlClient Public Class Form1 Dim Connstr As Object Dim password As String Private Property MySQLServer As String Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'TODO: This line of code loads data into the 'TestDataSet.tb_name' table. You can move, or remove it, as needed. Me.Tb_nameTableAdapter.Fill(Me.TestDataSet.tb_name) loadChart1() 'DatumDateTimePicker.Enabled = True End Sub Sub loadChart1() Dim dt As New DataTable Dim dv As DataView dt = GetData("") dv = New DataView(dt) Chart1.DataSource = dt Chart1.ChartAreas("ChartArea1").Area3DStyle.Enable3D = True Chart1.Series.Clear() Chart1.Palette = ChartColorPalette.Pastel Chart1.DataBindTable(dv, "Date") Chart1.Series(0).Name = "Olaf" Chart1.Series(0).ChartType = SeriesChartType.Line For Each s In Chart1.Series s.ChartType = SeriesChartType.Line Next End Sub Function GetData(ByVal Name As String) As DataTable Dim dt As New DataTable Dim Filename As String = "" Dim ConnectionString As String = "Server= localhost" Dim SQL As String = "Select zeit from tb_name" Dim conn As New MySqlConnection(ConnectionString) Dim command As New MySqlCommand(SQL) Dim da As New MySqlDataAdapter(command) da.Fill(dt) Return dt End Function Private Sub Chart1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Chart1.Click End Sub Private Sub Tb_nameBindingNavigatorSaveItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tb_nameBindingNavigatorSaveItem.Click Me.Validate() Me.Tb_nameBindingSource.EndEdit() Me.TableAdapterManager.UpdateAll(Me.TestDataSet) End Sub End Class Public Class MySql Private _connectionString As String Sub New(ByVal ConnectionString As String) ' TODO: Complete member initialization _connectionString = ConnectionString End Sub End Class

Chart Tool in Verbindung mit MySql???	2.748	cubx	02.03.11 01:46
Chart-Datenserien an die Spalten in einer Datatable binden	4.059	Manfred X	02.03.11 06:01
Re: Chart-Datenserien an die Spalten in einer Datatable bind...	2.397	cubx	02.03.11 13:58
Re: Chart-Datenserien an die Spalten in einer Datatable bind...	2.409	Manfred X	02.03.11 14:26
Re: Chart-Datenserien an die Spalten in einer Datatable bind...	2.035	cubx	02.03.11 16:09

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übersicht

Suchen