cc.ChartAreas.Add("Base")
  'Zwei Serien
  cc.Series.Add("Einnahmen")
  cc.Series.Add("Ausgaben")
 
  With cc.Series("Einnahmen")
      .ChartArea = "Base"
      .XValueMember = "Monat"
      .YValueMembers = "Einnahmen"
  End With
  With cc.Series("Ausgaben")
       .ChartArea = "Base"
       .XValueMember = "Monat"
       .YValueMembers = "Ausgaben"
  End With
 
  cc.DataSource = dtx
  cc.DataBind()