把默认时间放在X轴上？

Question

我在一个图表中有几个系列，我希望X轴每天在晚上00:00显示，如下面的第一张图片所示。

但是，当我添加一个从数据库获取其日期的系列时，它会更改为另一个我不想要的时间或格式(见图2)。

这是我正在使用的代码。

Dim theDate As Date
rows = dv.Table.Rows.Count
For i As Integer = 0 To rows - 1

    Debug.WriteLine(dv(i)(0))
    theDate = DateTime.ParseExact(dv(i)(0), "dd-MMM-yy HH:mm:ss.f", CultureInfo.CurrentCulture)
    Debug.WriteLine(theDate)

    'MsgBox(theDate.ToString("dd-MMM HH:MM", CultureInfo.InvariantCulture))

    With chrCurrent
        .ChartAreas("chr" + type).AxisX.LabelStyle.Format = DateTimeIntervalType.Days
        .ChartAreas("chr" + type).AxisX.LabelStyle.Format = "dd-MMM HH:mm"
        .Series("ser" + type).Points.AddXY(theDate, dv(i)(1))

    End With
Next

For i As Integer = 0 To 7 'Past 7 days
    With chrCurrent
        .Series("serHighHighLimit").Points.AddXY((DateSerial(Now.Year, Now.Month, Now.Day - i)), (limitRedHigh))
Next

图片1:

图片2:

Answer 1

尝试这样设置您的X轴最小值。您可能希望将其设置为去掉小时、分钟和秒的时间序列的最小日期。

 .ChartAreas("chr" + type).AxisX.Minimum = #2/27/2014 00:00:0#