_ Partial Class Form2 Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim ChartArea1 As System.Windows.Forms.DataVisualization.Charting.ChartArea = New System.Windows.Forms.DataVisualization.Charting.ChartArea() Dim Legend1 As System.Windows.Forms.DataVisualization.Charting.Legend = New System.Windows.Forms.DataVisualization.Charting.Legend() Dim Series1 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Dim Series2 As System.Windows.Forms.DataVisualization.Charting.Series = New System.Windows.Forms.DataVisualization.Charting.Series() Dim Title1 As System.Windows.Forms.DataVisualization.Charting.Title = New System.Windows.Forms.DataVisualization.Charting.Title() Me.Chart1 = New System.Windows.Forms.DataVisualization.Charting.Chart() Me.SteuernBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.SteuernDataSet = New Verkauf.SteuernDataSet() Me.SteuernTableAdapter = New Verkauf.SteuernDataSetTableAdapters.SteuernTableAdapter() CType(Me.Chart1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SteuernBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SteuernDataSet, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Chart1 ' ChartArea1.AxisX.LabelStyle.Format = "MM" ChartArea1.BackColor = System.Drawing.Color.DodgerBlue ChartArea1.BackGradientStyle = System.Windows.Forms.DataVisualization.Charting.GradientStyle.HorizontalCenter ChartArea1.BackImageTransparentColor = System.Drawing.Color.White ChartArea1.BackSecondaryColor = System.Drawing.Color.White ChartArea1.BorderColor = System.Drawing.Color.Gray ChartArea1.BorderDashStyle = System.Windows.Forms.DataVisualization.Charting.ChartDashStyle.Solid ChartArea1.BorderWidth = 2 ChartArea1.CursorX.LineColor = System.Drawing.Color.Black ChartArea1.CursorX.LineWidth = 3 ChartArea1.CursorY.LineWidth = 3 ChartArea1.Name = "ChartArea1" Me.Chart1.ChartAreas.Add(ChartArea1) Me.Chart1.DataSource = Me.SteuernBindingSource Legend1.Alignment = System.Drawing.StringAlignment.Center Legend1.BackGradientStyle = System.Windows.Forms.DataVisualization.Charting.GradientStyle.HorizontalCenter Legend1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Legend1.IsTextAutoFit = False Legend1.Name = "Datum" Me.Chart1.Legends.Add(Legend1) Me.Chart1.Location = New System.Drawing.Point(12, 12) Me.Chart1.Name = "Chart1" Series1.ChartArea = "ChartArea1" Series1.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Line Series1.EmptyPointStyle.BorderWidth = 5 Series1.Legend = "Datum" Series1.MarkerBorderColor = System.Drawing.Color.White Series1.MarkerStyle = System.Windows.Forms.DataVisualization.Charting.MarkerStyle.Diamond Series1.Name = "Ausgaben" Series1.SmartLabelStyle.CalloutLineWidth = 3 Series1.XValueMember = "Datum" Series1.XValueType = System.Windows.Forms.DataVisualization.Charting.ChartValueType.[Date] Series1.YValueMembers = "Aus_Kaufpreis_Gesamt" Series2.ChartArea = "ChartArea1" Series2.ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Spline Series2.Legend = "Datum" Series2.Name = "Einnahmen" Series2.XValueMember = "Datum" Series2.XValueType = System.Windows.Forms.DataVisualization.Charting.ChartValueType.[Date] Series2.YValueMembers = "Ein_Betrag_Gesamt" Me.Chart1.Series.Add(Series1) Me.Chart1.Series.Add(Series2) Me.Chart1.Size = New System.Drawing.Size(1560, 837) Me.Chart1.TabIndex = 0 Me.Chart1.Text = "Chart1" Title1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Title1.ForeColor = System.Drawing.Color.DodgerBlue Title1.Name = "Title1" Title1.Text = "Einnahmen / Ausgaben" Me.Chart1.Titles.Add(Title1) ' 'SteuernBindingSource ' Me.SteuernBindingSource.DataMember = "Steuern" Me.SteuernBindingSource.DataSource = Me.SteuernDataSet ' 'SteuernDataSet ' Me.SteuernDataSet.DataSetName = "SteuernDataSet" Me.SteuernDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema ' 'SteuernTableAdapter ' Me.SteuernTableAdapter.ClearBeforeFill = True ' 'Form2 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.DodgerBlue Me.ClientSize = New System.Drawing.Size(1584, 861) Me.Controls.Add(Me.Chart1) Me.Name = "Form2" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Form2" CType(Me.Chart1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SteuernBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SteuernDataSet, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents Chart1 As System.Windows.Forms.DataVisualization.Charting.Chart Friend WithEvents SteuernDataSet As Verkauf.SteuernDataSet Friend WithEvents SteuernBindingSource As System.Windows.Forms.BindingSource Friend WithEvents SteuernTableAdapter As Verkauf.SteuernDataSetTableAdapters.SteuernTableAdapter End Class