0
我在一个图表中有几个系列,我想让X轴在夜间的00:00每天显示,如下面的第一张图所示。在X轴上放置默认时间?
但是,当我添加一个从数据库中获取日期的系列时,它会更改为我不想要的其他时间或格式(请参见图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
PICTURE 1:
PICTURE 2:
你是我的英雄!谢谢。 – Lime3003