主题：[求助]图表中数据值在鼠标指针定位时显示值是能否将日期格式的时分秒去除？

测试了一下，没有方法满足你的要求.......

最多这样

Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t As Table = Tables("商品日销售汇总_Table1") '定义一个变量t引用数据表
Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.SeriesList.Clear() '清除图表原来的图系
'Chart.AxisX.Major = 1 '逐个显示
'Chart.AxisX.MinorTick = False '逐个显示
Series = Chart.SeriesList.Add() '增加一个图系
Series.TooltipText = "日期: {#XVAL},销量: {#YVAL}"
Series.Length = t.Rows.Count '图系的数据点数等于表的行数
For i As Integer = 0 To t.Rows.Count - 1 '指定每个数据点的位置
    Dim idx As Integer = Cint(Format(t.Rows(i)("销售日期"), "yyyyMMdd"))
    Series.X(i) = Cint(Format(t.Rows(i)("销售日期"), "yyyyMMdd")) '指定水平坐标
    Series.Y(i) = t.Rows(i)("销售数量") '指定垂直坐标
    Chart.AxisX.SetValueLabel(idx, t.Rows(i)("销售日期")) '指定字符表示
Next
Chart.AxisX.AnnoWithLabels = True '启用字符标示