2

我现在已将x 轴更改为DateAsOrdinal,但我想改进标签格式。我目前像这样处理XAxis.ScaleFormatEvent

Private Function OnXScaleFormatEvent(ByVal pane As GraphPane, ByVal axis As Axis, ByVal val As Double, ByVal index As Integer) As String
    Dim result As String = ""
    If val < priceBars.Count Then
        Dim time As Date = Date.FromOADate(priceBars(val).X)
        result = [String].Format("{0:D2}{1}{2:D2}", time.Hour, ":", time.Minute)
    End If

    Return result
End Function

如何让标签每 30 分钟打印一次?还是每 2 小时一次,如下图所示?我相信我仍然需要参考条形 x 值,因为我需要连续绘制多天,每天只有几个小时,如图所示;09:00-23:00。

在此处输入图像描述

4

2 回答 2

1

我认为,这会做:

chart.GraphPane.XAxis.Scale.MajorStepAuto = False
chart.GraphPane.XAxis.Scale.MajorUnit = DateUnit.Minute
chart.GraphPane.XAxis.Scale.MajorStep = 30
chart.GraphPane.XAxis.Scale.BaseTic = 0
于 2011-02-14T09:07:10.520 回答
0

通过单独格式化每个标签来解决这个问题。

于 2012-07-29T08:09:39.430 回答