在X轴上设置默认时间?

时间:2014-03-07 13:51:15

标签: vb.net date charts mschart

我在一个图表中有几个系列,我想让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:

  

1 个答案:

答案 0 :(得分:1)

尝试此操作以设置X轴最小值。您可能希望将其设置为时间序列中删除小时,分钟和秒的最短日期

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