Chart1.Series.Clear()
Chart1.Series.Add("Series1")
Chart1.Series.Add("Series2")
Chart1.Series("Series1").Points.Clear()
Chart1.Series("Series1").Points.AddXY(DGV1.Columns(5).HeaderText & "--" & DGV1.Rows(0).Cells(5).Value, DGV1.Rows(0).Cells(5).Value)
Chart1.Series("Series1").Points.AddXY(DGV1.Columns(6).HeaderText & "--" & DGV1.Rows(0).Cells(6).Value, DGV1.Rows(0).Cells(6).Value)
Chart1.Series("Series2").ChartArea = "ChartArea2"
Chart1.Series("Series2").Points.Clear()
Chart1.Series("Series2").Points.AddXY(DGV1.Columns(5).HeaderText & "--" & DGV1.Rows(xx).Cells(5).Value, DGV1.Rows(xx).Cells(5).Value)
Chart1.Series("Series2").Points.AddXY(DGV1.Columns(6).HeaderText & "--" & DGV1.Rows(xx).Cells(6).Value, DGV1.Rows(xx).Cells(6).Value)