MSChartの散布図で、横軸を日時、縦軸をデータ値にとり、飛び飛びの日付に対して与えられるデータ
を表示したいのですが、こちらのＨＰのサンプルを流用して書いたコードでは、横軸が日時表示にな
りませんでした。よい解決方法がありましたら、アドバイス願います。

    Dim Dat(1, 2) As Double　'<-多分、これが原因
    'X
    Dat(0, 0) = CDate("2005/6/19 10:00:01")
    Dat(0, 1) = CDate("2005/6/20 13:00:22")
    Dat(0, 2) = CDate("2005/6/20 14:53:37")
    'Y
    Dat(1, 0) = 100: Dat(1, 1) = 200: Dat(1, 2) = 300
    With MSChart1
        .ColumnCount = 2: .RowCount = 2+1
        For i = 0 To 1
            .Column = i + 1
            For j = 0 To 2
                .Row = j + 1: .Data = Dat(i, j)
            Next j
        Next i
     End With

>     Dim Dat(1, 2) As Double　'<-多分、これが原因
>     'X
>     Dat(0, 0) = CDate("2005/6/19 10:00:01")
>     Dat(0, 1) = CDate("2005/6/20 13:00:22")
>     Dat(0, 2) = CDate("2005/6/20 14:53:37")

データは数値しか扱えません。
どうしてもなら、Dat(0, 0) = 20050619100001# のように数値に変換すれば表示できます。
又、自分でグラフを描くなり、そのような市販のコントロールを使用するとか
因みに、Excel のグラフ機能では、描けますか？


# できれば、もう少しまともなハンドルネームでお願いします。（アダルト系と見間違う）

質問者は、マルチポスト先にも...(略
hhttp://www.gizshare.com/vbtomo/boards/vbchoshoqa.php?do=leaf&num=5131

#こちらのHPのサンプル...と両方に書いてあるのが謎です。