有人会使用 Teechart吗

Question

            Dim ds As DataSet
            Dim SqlStr As String
            Dim i As Integer            SqlStr = "select * from moneyin"            ds = RunSelectSQL(SqlStr)
            MsgBox(ds.Tables(0).Columns(0).ToString())
            MsgBox(ds.Tables(0).Columns(1).ToString())            For i = 1 To ds.Tables(0).Rows.Count
                Me.TChart1.Series(0).DataSource = ds.Tables(0)
                Me.TChart1.Series(0).YValues.DataMember = ds.Tables(0).Columns("money_amount").ToString()
                Me.TChart1.Series(0).LabelMember = ds.Tables(0).Columns("money_date").ToString()            Next我这样绑定了  图表上怎么只显示一条数据阿？？？  而且我X轴 是时间  显示成 7/22/2010 12:00 AM 我只要7/22/2010
怎么处理