VB.Net 2022折线图X轴标签日期与数组数据不符求助

问题原因 #

这种情况几乎都是日期的时间部分为00:00:00时，Chart控件的时区解析逻辑导致的偏移——如果你的本地时区比UTC晚（比如东八区），控件默认把00:00:00的本地日期解析为前一天的UTC时间，最终显示时就会少一天。

解决方案 #

1. 调整日期的时间部分

将数组中的日期时间设置为当天的非零点时间（比如中午12点），避免时区转换跨天：

' 批量处理日期数组并添加数据
For i As Integer = 5 To 0 Step -1
    Dim targetDate As DateTime = dateArray(i)
    ' 将时间固定为当天12点，消除时区偏移影响
    Dim adjustedDate As New DateTime(targetDate.Year, targetDate.Month, targetDate.Day, 12, 0, 0)
    euc.Points.AddXY(adjustedDate, EUCcount)
Next

2. 强制Chart控件使用本地时区并指定日期格式

给X轴设置明确的日期格式，同时禁用自动时区转换：

' 确保ChartArea存在，若未创建则先实例化
If eucChart.ChartAreas.Count = 0 Then
    eucChart.ChartAreas.Add("DefaultArea")
End If

With eucChart.ChartAreas("DefaultArea").AxisX
    .LabelStyle.Format = "yyyy-MM-dd" ' 指定固定的日期显示格式
    .IntervalType = DateTimeIntervalType.Days ' 按天间隔显示标签
    .Interval = 1 ' 每天显示一个标签
    .LabelStyle.IsEndLabelVisible = True ' 确保首尾日期正常显示
End With

3. 检查日期数组的生成逻辑

确认生成日期时使用本地日期而非UTC日期，避免源头出现偏差：

' 以周一为一周第一天生成过去7天的日期数组
Dim startDate As DateTime = Date.Today
' 调整到最近的周一
While startDate.DayOfWeek <> DayOfWeek.Monday
    startDate = startDate.AddDays(-1)
End While
' 生成数组
Dim dateArray(6) As DateTime
For i As Integer = 0 To 6
    dateArray(i) = startDate.AddDays(-i)
Next

内容的提问来源于stack exchange，提问作者Hannerz78