Try this
Private Sub Button1_Click_1(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Chart1.Series("Power").Points.Clear()
For Each line As String In IO.File.ReadAllLines("C:\TestFolder\123.txt")
Dim points() As Double = Array.ConvertAll(line.Split(","c), Function(s) CDbl(s))
Chart1.Series("Energy").Points.AddXY(points(0), points(0))
Next
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
Chart1.Series("Energy").Points.Clear()
For Each line As String In IO.File.ReadAllLines("C:\TestFolder\123.txt")
Dim points() As Double = Array.ConvertAll(line.Split(","c), Function(s) CDbl(s))
Chart1.Series("Power").Points.AddXY(points(1), points(0))
Next
End Sub
This does not remove the series, but just clears the data from the chart.
To toggle the legends you can add the following to the respective button events.
Chart1.Series("Power").IsVisibleInLegend = False
Chart1.Series("Energy").IsVisibleInLegend = True
Chart1.Series("Energy").IsVisibleInLegend = False
Chart1.Series("Power").IsVisibleInLegend = True
[Edit] Add addtional code.