> 横軸が、Timerでカウントする時間
散布図というか、折れ線グラフのイメージでよいですか？
https://support.office.com/ja-jp/article/4570a80f-599a-4d6b-a155-104a9018b86e


> グラフ上には何も表示がされません。(Point表示のseries2は表示されます。)
描画結果の画面イメージを貼ることはできますか？

どのような表示か連想しにくいのですが、
Legend のみが存在して、ChartArea が存在していない状態でしょうか？


> s.Points.AddXY(time, (1023 - x))
> t.Points.AddXY(time, (1023 - y))
s と t を、それぞれどのように取得しているのかの説明が漏れていますよ…。

Chart の設定がどうなっているのか分からないと話が伝わりにくいので、
画面に貼った後、初期設定からどのプロパティを変更したのかを教えてください。

また、CharArea が無くなっているとか、あるいは、そもそも
期待通りにデータを渡せていなかったということは無いでしょうか。
確認のためしばらく動かしてみた後で、下記のようにして
チャートの内容を調べてみてはいかがでしょう。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    ListBox1.BeginUpdate()

    ListBox1.Items.Clear()

    ListBox1.Items.Add("---Legends---")

    For Each lg In Me.Chart1.Legends

        ListBox1.Items.Add("[" & lg.Name & "]")

    Next

    ListBox1.Items.Add("---ChartAreas---")

    For Each ca In Me.Chart1.ChartAreas

        ListBox1.Items.Add("[" & ca.Name & "]")

    Next

    ListBox1.Items.Add("---Series---")

    For Each sr In Me.Chart1.Series

        ListBox1.Items.Add("[" & sr.Name & "]")

        ListBox1.Items.Add("凡例=" & sr.Legend)

        ListBox1.Items.Add("エリア=" & sr.ChartArea)

        ListBox1.Items.Add("データ数=" & sr.Points.Count.ToString("N0"))

        For Each p In sr.Points

            ListBox1.Items.Add(vbTab & p.XValue.ToString("R") & vbTab & p.YValues.FirstOrDefault().ToString("R"))

        Next

    Next

    ListBox1.Items.Add("---EndOfChart---")

    ListBox1.EndUpdate()

End Sub