I still don't do Data, so I can't explain why the effect you are seeing happens, buuuut.....

When using your DataTable, try casting your data to the appropriate Type:
Code:
For Each row As DataRow In ARpassover_table.Rows
    
    Dim x As Double = CDbl(row.Item(0))
    Dim y As Double = CDbl(row.Item(1))

    Chart1.Series(0).Points.AddXY(x, y)

Next row
Or maybe create a strongly Typed DataTable:
Code:
ARpassover_table = New DataTable
ARpassover_table.Columns.Add("X", GetType(Double))
ARpassover_table.Columns.Add("Y", GetType(Double))
'
' Fill table with data
'
and:
Code:
For Each row As DataRow In ARpassover_table.Rows
    Chart1.Series(0).Points.AddXY(row.Item("X"), row.Item("Y"))
Next row
Maybe databinding to the Chart will work with a strongly Typed DataTable? I don't know; I don't do Data!