2014-03-07 100 views
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:

回答

1

試試這個來設置你的X軸最小值。你可能想把它設置爲你的時間系列的小時,分​​和秒的最短日期剝離

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

你是我的英雄!謝謝。 – Lime3003