生成图表中的代码如下，X轴设置了日期格式为 dd-hh:mm 但实际显示的还是长日期，请参考图的X轴日期。

                For r As Integer = 0 To t.Rows.Count - 1  \'指定每个数据点的位置
                    \'Series.X(r) = t.Rows(r)("Time")  \'指定水平坐标,为table中的时间数据
                    Series.X(r) = r
                    Series.Y(r) = t.Rows(r)(c.Name)  \'指定垂直坐标,为table中的各列数据
                    If r Mod 60 = 0 Then \' 因为担心日期时间过密,每隔60个,X轴显示文本,但数据是保持连续的.
                        Chart.AxisX.SetValueLabel(r, t.Rows(r)("Time"))  \'指定显示的文字
                        Chart.AxisX.DateType = True \'明确指定X轴是日期型
                        Chart.AxisX.AnnoFormatString = "dd-hh:mm" \'指定日期标示格式
                        Chart.AxisX.GridMajorVisible = False
                    End If
                Next
                Chart.AxisX.AnnoWithLabels = True \'启用字符标示

 改这一句

Chart.AxisX.SetValueLabel(r, Format(t.Rows(r)("Time"), \'dd-hh:mm\'")  \'指定显示的文字